How to change width, height and FPS of existing SWF flash movie file using SWF Scout library

Download source code of this example: swfscout_changing_width_height_and_fps.zip (200KB)

Source and changed (width, height and FPS (speed) are changed) flash movies:

=>

Source code:

' read information about source flash file
SWFFileName = "Shapes.swf"

NewWidth = 800
NewHeight = 600
NewTop = -100
NewLeft = -70

' read information about current width, height, top and left
Set SWFFileInfo = CreateObject("SWFScout.SWFFileInfo")
SWFFileInfo.LoadFile SWFFileName

FPS = SWFFileInfo.FPS
Height = SWFFileInfo.YMax - SWFFileInfo.YMin
Width = SWFFileInfo.XMax - SWFFileInfo.XMin
CurrentTop = SWFFileInfo.XMin
CurrentLeft = SWFFileInfo.XMin
Coord = SWFFileInfo.SystemCoord

Set SWFFileInfo = nothing

' now create new movie with same width, height and fps

Set Movie = CreateObject("SWFScout.FlashMovie")

Movie.InitLibrary "demo","demo"

Movie.BeginMovie NewLeft,NewTop,NewWidth,NewHeight,Coord,FPS,6

ExtSWF= Movie.AddExternalSWF ("shapes.swf", 0, true) ' 0 is seimRoot mode = we "merge" external swf into current

Movie.EndMovie

Movie.SaveToFile "ReBoundSWFMovie.swf"

Download source code of this example: swfscout_changing_width_height_and_fps.zip (200KB)