Höhe und Breite von einem JPG Bild im TImage

[Helmi]

Hallo,

ich hab grad einen test gemacht:

Delphi-Quellcode:

uses JPEG;

procedure TForm1.Button1Click(Sender: TObject);
begin
  Image1.Picture.LoadFromFile('d:\test.jpg');

  ShowMessage(IntToStr(Image1.Picture.Height));
end;

Ich bekam in der ShowMessage die eigentliche Höhe des Jpegs angezeigt.
(nicht die Höhe des Image)