Navigateur
eric30eric
Messages postés
8
Date d'inscription
mardi 14 janvier 2003
Statut
Membre
Dernière intervention
6 octobre 2003
-
9 août 2003 à 04:21
cs_bazole Messages postés 37 Date d'inscription mardi 25 février 2003 Statut Membre Dernière intervention 13 novembre 2005 - 17 août 2003 à 08:52
cs_bazole Messages postés 37 Date d'inscription mardi 25 février 2003 Statut Membre Dernière intervention 13 novembre 2005 - 17 août 2003 à 08:52
1 réponse
cs_bazole
Messages postés
37
Date d'inscription
mardi 25 février 2003
Statut
Membre
Dernière intervention
13 novembre 2005
17 août 2003 à 08:52
17 août 2003 à 08:52
Pour l'affichage de l'avi :
MediaPlayer dans l'Onglet Systeme de Delphi 6
un Panel pour l'affichage
et un bouton.
procedure TForm1.Button1Click(Sender: TObject);
var
fichier: string;
begin
fichier := 'recherche.avi';
//déclare le panel comme zone d'affichage
MediaPlayer1.Display := Panel1;
//transmet le nom et le chemin du fichier avi au MediaPlayer
MediaPlayer1.FileName := fichier;
//Ouvre le fichier
MediaPlayer1.Open;
//lit le fichier
MediaPlayer1.Play;
end;
bazole
MediaPlayer dans l'Onglet Systeme de Delphi 6
un Panel pour l'affichage
et un bouton.
procedure TForm1.Button1Click(Sender: TObject);
var
fichier: string;
begin
fichier := 'recherche.avi';
//déclare le panel comme zone d'affichage
MediaPlayer1.Display := Panel1;
//transmet le nom et le chemin du fichier avi au MediaPlayer
MediaPlayer1.FileName := fichier;
//Ouvre le fichier
MediaPlayer1.Open;
//lit le fichier
MediaPlayer1.Play;
end;
bazole