-
I have noticed that when I use the Windows API, I cannot play some avi files. the following is the code I use, and it only works for some avi files. Why????
In general, declarations area:
Private Declare Function mciSendString Lib "winmm.dll" Alias _
"mciSendStringA" (ByVal lpstrCommand As String, ByVal _
lpstrReturnString As Any, ByVal uReturnLength As Long, ByVal _
hwndCallback As Long) As Long
Public FileName
--------------------------------------
Open App.Path & "\" & App.EXEName & ".stp" for Input As #1
Input #1, FileName
close #1
Last$ = ScreenSaver.hWnd & " Style " & &H40000000
ToDo$ = "open " & FileName & " Type avivideo alias video parent " & Last$
i = mciSendString(ToDo$, 0&, 0, 0)
i = mciSendString("play video repeat", 0&, 0, 0)
-
You might be using different codecs for the different AVI's. Try using AVI's created from the same source. If that does not work, try adding Windows Media Player in Project-Components on the menu bar. This control works with a variety of AVI's
If you need any more help feel free to e-mail me at [email protected] I will try to help with anything that I can.
David Muir
-
The sendstring command requires that file/path names be in 8.3 format.
Use the "GetShortPathName" API call to translate.
If you are receiving an errorcode of 259 then this is most likely the problem.
