But if I run it in Vista Home Premium, the sound is heard but the moving picture is not displayed.
What am I doing wrong?
- Roger
Code: Select all
STATIC FUNCTION VidPlay(oDlg,cBuffer,oBmp3,cFileV)
LOCAL nStart := 0
cBuffer:=Space(200)
IF EMPTY(cFileV)
cFileV := "MyVideo.avi"
ENDIF
mciSendStr("OPEN AVIVIDEO!"+Upper(Alltrim(cFileV))+" ALIAS VIDEO PARENT ";
+Alltrim(str(oBmp3:hWnd)),@cBuffer,oDlg:hWnd)
mciSendStr("put video destination at 0 0 220 174",@cBuffer,oDlg:hWnd)
mciSendStr("WINDOW VIDEO HANDLE "+Alltrim(str(oBmp3:hWnd)),@cBuffer,oDlg:hWnd)
mciSendStr("PLAY VIDEO FROM "+ALLTRIM(STR(nStart)),@cBuffer,oDlg:hWnd)
RETURN nil