Getting Started in Visual Basic 6Bytescout SWF To Video SDK

This example shows how to use SWF To Video SDK to convert SWF into PNG image in Visual Basic 6

VB
Copy
Private Sub Command1_Click()

  ' Create an instance of SWFToVideo ActiveX object
Set converter = CreateObject("BytescoutSWFToVideo.SWFToVideo")

' Set debug log
'converter.SetLogFile "log.txt"

' Register SWFToVideo
converter.RegistrationName = "demo"
converter.RegistrationKey = "demo"

' uncomment to enable PNG with transparency
' converter.RGBAMode = true ' enable BEFORE setting InputSWFFileName property

' Set input SWF file
converter.InputSWFFileName = "SlideShowWithEffects.swf"

' Set output movie dimensions
converter.OutputWidth = 640
converter.OutputHeight = 480

converter.StartFrame = 5

converter.ConvertToPNG "output.png"

Set converter = Nothing

End Sub