TMPlayer et TPanel ...
Résolu
cs_MAsterC
Messages postés
217
Date d'inscription
lundi 4 février 2002
Statut
Membre
Dernière intervention
19 décembre 2012
-
5 avril 2003 à 20:47
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 6 avril 2003 à 00:06
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 6 avril 2003 à 00:06
1 réponse
cs_Delphiprog
Messages postés
4297
Date d'inscription
samedi 19 janvier 2002
Statut
Membre
Dernière intervention
9 janvier 2013
32
6 avril 2003 à 00:06
6 avril 2003 à 00:06
Voilà la réponse : dans l'évènement OnClick du composant TMediaPlayer, on redimensionne en cas d'appui sur la touche Play, les autres évènements ne devant pas donner lieu à un redimensionnement :
Ici, Panel1 est le composant déclaré dasn la propriété Display du composant TMediaPlayer.
May Delphi be with you
procedure TMediaPlayerDemoForm.MediaPlayer1Click(Sender: TObject;
Button: TMPBtnType; var DoDefault: Boolean);
begin
if Button = btPlay then
MediaPlayer1.DisplayRect := Panel1.ClientRect
end;
Ici, Panel1 est le composant déclaré dasn la propriété Display du composant TMediaPlayer.
May Delphi be with you
