Animations Sample (VB6)

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 or C:\Program Files\Softelvdm\SftButton OCX 4.0\Samples\VB6\Animations\Form1.frm (on 32-bit Windows versions).

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