RECUPERER LA RESOLUTIONS (WIDTH & HEIGHT) DANS UN FICHIERS AVI
bbd2
Messages postés3Date d'inscriptionmercredi 31 mai 2006StatutMembreDernière intervention31 mai 2006
-
31 mai 2006 à 11:13
jackalunion
Messages postés128Date d'inscriptionmercredi 8 janvier 2003StatutMembreDernière intervention14 juillet 2008
-
25 juin 2008 à 04:05
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
jackalunion
Messages postés128Date d'inscriptionmercredi 8 janvier 2003StatutMembreDernière intervention14 juillet 2008 25 juin 2008 à 04:05
certaines choses oui mais le reste c'est le broulliard
bbd2
Messages postés3Date d'inscriptionmercredi 31 mai 2006StatutMembreDernière intervention31 mai 2006 31 mai 2006 à 11:28
plus simple et fonctionne :
mettre un composant Tmediaplayer sur la fiche.
Tmediaplayer1.visible:=false;
dans l'evenement onclick ou autre :
if OpenDialog1.Execute then
begin mediaplayer1.filename:=OpenDialog1.Filename;
mediaplayer1.Open; hauteur_video:=mediaplayer1.DisplayRect.Bottom-mediaplayer1.DisplayRect.top;
largeur_video:=mediaplayer1.DisplayRect.right-
mediaplayer1.DisplayRect.left;
mediaplayer1.close;
end;
hauteur_video et largeur_video étant bien entendu deux entiers
bbd2
Messages postés3Date d'inscriptionmercredi 31 mai 2006StatutMembreDernière intervention31 mai 2006 31 mai 2006 à 11:13
25 juin 2008 à 04:05
31 mai 2006 à 11:28
mettre un composant Tmediaplayer sur la fiche.
Tmediaplayer1.visible:=false;
dans l'evenement onclick ou autre :
if OpenDialog1.Execute then
begin mediaplayer1.filename:=OpenDialog1.Filename;
mediaplayer1.Open; hauteur_video:=mediaplayer1.DisplayRect.Bottom-mediaplayer1.DisplayRect.top;
largeur_video:=mediaplayer1.DisplayRect.right-
mediaplayer1.DisplayRect.left;
mediaplayer1.close;
end;
hauteur_video et largeur_video étant bien entendu deux entiers
31 mai 2006 à 11:13
erreur ES/32