Einzelnen Beitrag anzeigen

Benutzerbild von Stanlay Hanks
Stanlay Hanks

Registriert seit: 1. Mär 2003
2.078 Beiträge
 
Delphi 2005 Professional
 
#4

Re: Größe eines Bildes in TImage herausfinden

  Alt 5. Sep 2005, 00:07
Image.Height / Image.Width trifft (meistens) wohl nur entweder auf Höhe oder Breite zu.
Wenn die Höhe größer ist, als die Breite, ist die Höhe (wegen strech := true) gleich der Höhe des Images.
Dann nimmst du die Originalhöhe (Image.Picture.Height) und errechnest, um wieviel Prozent das Image (Image.Height) kleiner/größer ist. Dann nimmst du diese Prozentzahl der Originalbreite und hast die dargestellte Breite.
Wenn die Höhe kleiner als die Breite ist, machst du das ganze eben umgekehrt (Prozentsatz mit Originalbreite und Imagebreite errechnen usw.)

Man liest sich, Stanlay
  Mit Zitat antworten Zitat