Video dans un panel a l'aide de mciSendString

lrdjv Messages postés 20 Date d'inscription dimanche 5 octobre 2003 Statut Membre Dernière intervention 6 avril 2005 - 8 mars 2005 à 15:41
lrdjv Messages postés 20 Date d'inscription dimanche 5 octobre 2003 Statut Membre Dernière intervention 6 avril 2005 - 6 avril 2005 à 07:38
Salut à tous !




Voila depuis plusieurs jour je m’acharne pour réussir à lire
une vidéo dans un panel ou une image à l’aide de mciSendString pourtant les commande mci que je fourni fonctionne parfaitement
sous vb mais sous delphi ???




voila le code que j'ai tanté :


mciSendString(PansiChar('open ' + fichier + ' alias movie parent'+ inttostr(image1.Canvas.Handle)), nil, 0, 0);

mciSendString('play movie from 0', nil, 0, 0);









<-----LRDJV----->

2 réponses

cs_MAsterC Messages postés 217 Date d'inscription lundi 4 février 2002 Statut Membre Dernière intervention 19 décembre 2012
6 avril 2005 à 03:26
D'abord, prend le composant TMediaPlayer...
Ensuite dans les propriétés, Display assigne ton Panel..

Pour jouer:
TMediaPlayer.play;

Voila! c'est plus facile comme sa!

MAsterC
0
lrdjv Messages postés 20 Date d'inscription dimanche 5 octobre 2003 Statut Membre Dernière intervention 6 avril 2005
6 avril 2005 à 07:38
Merci depuis le temps c'est ce que j'ai fais.Mais je voulais pas passer
par le composant tmedia mais vraiment escploter les commandes mci

<-----LRDJV----->
0
Rejoignez-nous