Bonjour à tous,

J'aimerais avoir le poids en octets d'une image chargée dynamiquement dans un TImage :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
ListeFichiers: TFileListBox;
ImgImage: TImage;
hauteur, largeur, poids: Integer;
 
//ListeFichier contient les images du Dossier
ListeFichiers.Directory := Dossier;
ListeFichiers.update;
for i := 0 to ListeFichiers.Count-1 do begin
     //On charge l'image dans le TImage
     ImgImage.Picture.LoadFromFile(ListeFichiers.items[k]);
     hauteur:= ImgImage.Height;
     largeur:= ImgImage.Width;
     //poids := ?????
end;
Les images sont des jpeg et je n'ai pas trouvé la propriété poids dans le TImage.

Merci d'avance pour vos réponses.