Imprimer une image

[Résolu]
Signaler
Messages postés
10
Date d'inscription
jeudi 30 octobre 2003
Statut
Membre
Dernière intervention
28 mars 2010
-
Messages postés
10
Date d'inscription
jeudi 30 octobre 2003
Statut
Membre
Dernière intervention
28 mars 2010
-
bonjour,

Comment fait-on pour connaître la résolution d'une image (bmp ou jpeg) afin de pouvoir l'imprimer de la bonne dimension ?

Merci

JAKONIL[b]

1 réponse

Messages postés
10
Date d'inscription
jeudi 30 octobre 2003
Statut
Membre
Dernière intervention
28 mars 2010

Merci pour ta réponse, mais ce n'est pas ce que je cherche, en fait j'ai trouvé dans ce lien :
http://delphi.developpez.com/cours/graphiques/menugra/bitmap1.php

http://delphi.developpez.com/cours/graphiques/menugra/bitmap2.php

(merci à WhiteHippo).

cela m'a permis décrire la fonction suivante qui correspond éxactement à mon besoin:

//-----------------------------------------------------------------------------

//Renvoi la résolution de la photo en pixels par metre.

function ResolutionPhoto(fichier : string): LongInt;

const Ficheader = sizeof(TBITMAPFILEHEADER);

BitMapInfo = sizeof(TBITMAPINFOHEADER);

var FichierTemp : file;

InfoFichier : TBITMAPFILEHEADER;

InfoImage : TBitmapInfoHeader;

begin

assignFile(fichierTemp, fichier);

Reset(FichierTemp, 1);

BlockRead(FichierTemp, InfoFichier, Ficheader);

BlockRead(FichierTemp, InfoImage, BitMapInfo);

CloseFile(FichierTemp);

result := InfoImage.biXPelsPerMeter;

end;

//-----------------------------------------------------------------------------

Encore merci.


JAKONIL