Bonjour,
Quelqu'un peut-il me fournir le code source de la lacture de la largeur et la hauteur d'un bitmap sans ouvrir le fichier en extrayant ces informations de l'entête du fichier ?
Merci d'avance
Bonjour,
Quelqu'un peut-il me fournir le code source de la lacture de la largeur et la hauteur d'un bitmap sans ouvrir le fichier en extrayant ces informations de l'entête du fichier ?
Merci d'avance
Voici le code :
Merci tout de même à tous et particulièrement aux 20 delphinautes qui ont lus la question
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 function GetBMPHeight_Width( const FileName: TFileName; var BMP_W,BMP_H : Integer):boolean; var FileStream: TFileStream; InfoHeader: TBitmapInfoHeader; begin result:= fileExists(FileName); if result then begin FileStream := TFileStream.Create(FileName,fmOpenRead OR fmShareDenyNone); try FileStream.Seek(SizeOf(TBitmapInfoHeader), soFromBeginning); FileStream.Read(InfoHeader, SizeOf(InfoHeader)); BMP_W:= InfoHeader.biWidth; BMP_H:= InfoHeader.biHeight; finally FileStream.Free; end; end; end;
Bonjour,
Quelqu''un sait-il comment surcharger la fonction Tbitmap.LoadFromFile() de manière à ce que avant de charger la bitmap cette fonction appele une procedure externe d'une DLL comme celle que je viens de publier en réponse à la question précédente "Lecture dans BmpHeader largeur et hauteur" afin d'initialiser les deux variables générale CurentWidthBMP et CurentHeightBMP
Un exemple de code serait bienvenu
Merc à tous les delphinautes
colorid
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager