salut,
je cherche à lire une partie d'une vidéo en utilisant l'api mciSendStringA.
le probleme n'est pas la lecture, mais le fait qu'elle ne s'arrete pas à l'interval donné mais seulement à la fin de la video.
voici un code tres leger pour expliquer ma demarche :
Private Declare Function mciSendStringA Lib "winmm.dll" (ByVal lpstrCommand As String, ByVal lpstrReturnString As String, ByVal uReturnLength As Long, ByVal hwndCallback As Long) As Long
Private Sub Form_Load()
mciSendStringA "open MPEGVideo!C:\test.avi alias myvideo", 0&, 0&, 0&
Dim TDur As String * 128
mciSendStringA "set myvideo time format frames", TDur, 128, 0&
mciSendStringA "play myvideo from 0 to 300", 0&, 0&, 0&
End Sub
Private Sub Form_Unload(Cancel As Integer)
mciSendStringA "stop myvideo", 0&, 0&, 0&
mciSendStringA "close myvideo", 0&, 0&, 0&
End Submyvideo est l'alias que j'utilise pour le fichier utilisé, ce qui n'est pas comme je l'espere est en rouge
en fait, je veux lire par exemple de la premiere frame jusqu'a la frame x et que la video s'arrete à cette frame x. mais ca ne s'arrete pas.
pourtant d'apres msdn (
[ Lien ]ici), il est possible de le faire. (je tiens à signaler qu'il s'agit d'une video du type digitalvideo et que le resultat est le meme quelque soit le fichier utilisé).
j'ai essayer avec un format de temps en millisecondes mais c'est pareil.
donc d'apres vous, y a-t-il une chose mal faitre ou oubliée dans ce code pour atteindre ce but ?
merci