Discussion :

[gerardTar]

bonjour,

est-il possible avec tmediaplayer d'afficher une image particulière issue d'une vidéo.
en gros, est-il possible de faire un arrêt sur image sur le plan désiré (par programmation).

par avance merci.

[Gilles Louïse]

Vous pouvez utiliser la propriété EndPos, par exemple pour arrêter la video à la moitié, on peut écrire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
TRect rec;
 
rec.Left=0;
rec.top=0;
rec.Bottom=Panel1->Height;
rec.right=Panel1->Width;
 
MediaPlayer1->FileName = "toto.avi";
MediaPlayer1->Display = Panel1;
MediaPlayer1->Open();
MediaPlayer1->DisplayRect=rec;
MediaPlayer1->EndPos = MediaPlayer1->TrackLength[1]/2; // division par 2 de la longueur
MediaPlayer1->Play();

Si toutefois vous ne voulez voir qu'une seule image et non un fragment de séquence, il suffit de dire StartPos=EndPos.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
TRect rec;
 
rec.Left=0;
rec.top=0;
rec.Bottom=Panel1->Height;
rec.right=Panel1->Width;
 
MediaPlayer1->FileName = "toto.avi";
MediaPlayer1->Display = Panel1;
MediaPlayer1->Open();
MediaPlayer1->DisplayRect=rec;
MediaPlayer1->StartPos = MediaPlayer1->TrackLength[1]/2;
MediaPlayer1->EndPos = MediaPlayer1->StartPos;
MediaPlayer1->Play();

À bientôt
Gilles

[gerardTar]

tout fonctionne bien.
en plus l'utilisation de DisplayRect permet de faire un stretch de la vidéo lorsque la définition de l'écran change.
encore merci