Die Grösse eines Bildes feststellen ?

[Mirilin]

wenn das Bild in einer TImage liegt, sollte es glaube ich auch so gehen:

Delphi-Quellcode:

...
var
  w,h : Integer;
begin
  ...
  w := Image1.Picture.Width;
  h := Image1.Picture.Height;
  ...
end;
...

Oder?