Die Grösse eines Bildes feststellen ?

[Darty]

Wie komme ich an die Bild-Grösse ran ? Ich möchte die width und height eines Bild und nicht die der TImage rausbekommen.

Oder müsste man da tricksen dass die TImage auf Autosize steht und dann die width und height werte von der TImage entnehmen kann ?

[Mirilin]

Delphi-Quellcode:

...
var
  b: Tbitmap;
  w,h : Integer;
begin
  ...
  w := B.Width;
  h := B.Height;
  ...
end;
...

geht das nicht?

[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?

[Darty]

Hmm, klingt logisch hatte ich noch nicht ausprobiert .. Werde es testen und dann das Ergebnis hier posten ..

[Darty]

Hallo Mirilin,

Code:

Image1.Picture.Width;
Image1.Picture.Height;

Klappt wunderbar

Danke nochmals ..