RECUPERER LA RESOLUTIONS (WIDTH & HEIGHT) DANS UN FICHIERS AVI

bbd2 Messages postés 3 Date d'inscription mercredi 31 mai 2006 Statut Membre Dernière intervention 31 mai 2006 - 31 mai 2006 à 11:13
jackalunion Messages postés 128 Date d'inscription mercredi 8 janvier 2003 Statut Membre Dernière intervention 14 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.

https://codes-sources.commentcamarche.net/source/34381-recuperer-la-resolutions-width-height-dans-un-fichiers-avi

jackalunion Messages postés 128 Date d'inscription mercredi 8 janvier 2003 Statut Membre Dernière intervention 14 juillet 2008
25 juin 2008 à 04:05
certaines choses oui mais le reste c'est le broulliard
bbd2 Messages postés 3 Date d'inscription mercredi 31 mai 2006 Statut Membre Dernière intervention 31 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és 3 Date d'inscription mercredi 31 mai 2006 Statut Membre Dernière intervention 31 mai 2006
31 mai 2006 à 11:13
fonctionne pas :
erreur ES/32