Lecteur MPG

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Lecteur MPG

Crazy-Eagle

Salut a tous,

Je voudrais savoir comment faire un simple lecteur MPG en utilisant le composant TMediaPlayer.

Merci de m'aider

Publicité

Ciler

Crazy-Eagle a écrit :

Salut a tous,

Je voudrais savoir comment faire un simple lecteur MPG en utilisant le composant TMediaPlayer.

Merci de m'aider

procedure TForm1.MediaPlayer1Click(Sender: TObject; Button: TMPBtnType;
var DoDefault: Boolean);
begin
case Button of
btPlay: MediaPlayer1.Play;
btStop: MediaPlayer1.Stop;
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
If not Opendialog1.Execute then exit;
MediaPlayer1.FileName := Opendialog1.FileName;
MediaPlayer1.Open;
end;

Et dans ton opendialog, tu met un filtre en *.mpg

---------------
And I looked, and behold a pale horse: and his name that sat on him was Death, and Hell followed with him. Revelations 6:8

antp

Super Administrateur
Champion des excuses bidons

Il est pas beau ton code

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Ciler

antp a écrit :

Il est pas beau ton code

cad ?

J'aurai effectivement pu mettre un with MediaPlayer1 dans chaque proc. Et puis aussi peut-etre que tu prefere commencer l'indentation des le 1er begin/en. Moi j'aime pas trop, spa trop aux normes mais ca va, personne me relis jamais. En general, BS integre mes trucs a la brutale : ca compile, c que c bon !

Et je passe sur mon dernier truc utilisant le VTV ou tout passe uniquement pke le timeout du VTV est plus lent que celui du thread principal (et donc essaye pas de m'afficher des nodes dont les donnees ont disparu).

---------------
And I looked, and behold a pale horse: and his name that sat on him was Death, and Hell followed with him. Revelations 6:8

antp

Super Administrateur
Champion des excuses bidons

non le with pour 2 lignes on s'en fout, je faisais allusion aux lignes non identées et au if not ... then exit qui est pas bô, normalement on fait plutôt if ... then ... en mettant le truc à faire dans le if.

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Ciler

antp a écrit :

If not truc then bidule; spabeau ?
Ben chui pas en lice pour le "plus beau code award" alors :whistle:

---------------
And I looked, and behold a pale horse: and his name that sat on him was Death, and Hell followed with him. Revelations 6:8

antp

Super Administrateur
Champion des excuses bidons

ciler a écrit :

If not truc then bidule; spabeau ?

le fait de sortir de la fonction plutôt que d'englober le reste du code dans un if...

parce que si par après tu dois rajouter un truc à faire dans les deux cas tu dois tout modifier

puis pour le beau code, c'est surtout une question de lisibilité... quand t'es habitué à lire le code formatté de la manière dont Borland le recommande, t'as plus facile à lire ce code-là, et ça tombe bien vu que c'est ça que la majorité des gens utilisent...

---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire

Crazy-Eagle

Hum, et ma vidéo et sort ou ? TImage ? ou comment je fais pour l'afficher ? J'avais lu qque part qu'il fallait passer par un TPanel ...

Ciler

Crazy-Eagle a écrit :

Hum, et ma vidéo et sort ou ? TImage ? ou comment je fais pour l'afficher ? J'avais lu qque part qu'il fallait passer par un TPanel ...

La ca va te faire une fenetre independante. APres si tu veux faire des subtilites, c a toi de voir, mais c un poil plus penible.

---------------
And I looked, and behold a pale horse: and his name that sat on him was Death, and Hell followed with him. Revelations 6:8

Crazy-Eagle

Ya rien qui s'ouvre, rien qui s'affiche, j'ai beau faire Display ou rien ya KEDAL :cry: :cry: :cry:

HELP NEEDED :??:

Publicité

lung

Ta propriété AutoOpen est à True ?

http://cyberforce.phpnet.org/phpbb/index.php

FORUM HardWare.fr

Programmation

Delphi/Pascal

Lecteur MPG

Sujets relatifs
Ouvrir un fichier en lecteur seule	[C, C++] Comment régler la vitesse d'un lecteur cd ou dvd ???
[Résolu][Php] Problème explorateur de fichiers (lecteur réseau)	[PHP] opendir() impossible sur un lecteur réseau
[JAVA] Peut on faire un lecteur mp3 en java ?	proposer l'installation du lecteur flash
D4 : un scan du lecteur avec jauge d'avancement	URGENT : comment connaître la lettre du lecteur CD-ROM ????
lecteur carte à puce	[DOS] forcer la déconexion d'un lecteur reseau
Plus de sujets relatifs à : Lecteur MPG

Page générée en 0.064 secondes