Bonjour à tous,
je n'arrive pas à intégrer mplayer dans un programme; avec le code ci-dessous, j'obtiens le son mais pas l'image.
Je me demande s' il me manque pas une option à mplayer .
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 procedure TForm1.Button2Click(Sender: TObject); var pid:dword; pos:trect; begin pos.Left:=10; pos.Top:=10; pos.Right:=320; pos.Bottom:=240; pid:=GetProcessID; videoproces:=tprocess.Create(nil); videoproces.WindowRect:=pos; videoproces.CommandLine:='mplayer /home/toto/Téléchargement/Sita_Sings_the_Blues.ogg -slave -quiet -wid '+inttostr(GetProcessID); videoproces.Options:=[pousepipes]; videoproces.Execute; end;
Quelqu'un a-t-il déjà essayé et réussi ??
Merci .
Partager