This sample illustrates AVI animations with AVIPlay method.
The source code is located at C:\Program Files (x86)\Softelvdm\SftButton OCX 4.0\Samples\VB6\Animations\Form1.frm.
Option Explicit
Private Sub CloseButton_Click()
End
End Sub
Private Sub Form_Load()
' Define all animations at run-time using the AVIPlay method
SftButtonSearch.AVIPlay 1, ".\Search.avi", 0, -1
SftButtonFind.AVIPlay 1, ".\FindComp.avi", 0, -1
SftButtonDownload.AVIPlay 1, ".\Download.avi", 0, -1
End Sub