Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Größe eines Bildes auf TImage (https://www.delphipraxis.net/210800-groesse-eines-bildes-auf-timage.html)

Blup 16. Jun 2022 15:04

AW: Größe eines Bildes auf TImage
 
Wenn die Grafik skalliert dargestellt wird ohne das Seitenverhältnis zu verändern, musst du das Seitenverhältnis der Grafik mit dem Seitenverhältnis des Image vergleichen.
Delphi-Quellcode:
d1 := Image.Picture.Width/Image.Picture.Height;
d2 := Image.Width/Image.Heigh;

if d1 < d2 then
   { Rand ist links und rechts }
else if d1 > d2 then
  { Rand is oben und unten }
else
  { Kein Rand }

himitsu 16. Jun 2022 17:40

AW: Größe eines Bildes auf TImage
 
Ja, wenn man nur wissen will wo ein Rand ist, dann besser mit den Seitenverhältnisen und nicht den Seitenlängen rechnen/vergleichen.

Wenn das Bild auch noch gestrecht wird, dann kannst du sowieso nur mit den Radio / dem Seitenverhältnis rechnen, da die Längen ja im Verhältnis stehen, aber nicht direkt vergleichbar sind, wenn das Picture vergrößert/verkleinert dargestellt wird.


Zitat:

Zitat von KodeZwerg (Beitrag 1507394)
Zitat:

Zitat von Willie1 (Beitrag 1507391)
wenn mir Picture.Height/Width nicht zur Verfügung nicht zur Verfügung stehen würden

Dann stell es doch kurz zur Verfügung?
Delphi-Quellcode:
var
  pict: TPicture;
  w, h: Integer;
begin
  pict := TPicture.Create;        
  try
    pict.Assign(DasImage);
    w := pict.Width;
    h := pict.Height;
  finally
    pict.Free;
  end;
  // mach was mit w und h
end;

Nein, dann nimmt man direkt DasImage.Width und DasImage.Height :zwinker:

KodeZwerg 16. Jun 2022 18:29

AW: Größe eines Bildes auf TImage
 
Zitat:

Zitat von himitsu (Beitrag 1507433)
Nein, dann nimmt man direkt DasImage.Width und DasImage.Height :zwinker:

:thumb:


Zitat:

Zitat von himitsu (Beitrag 1507433)
Wenn das Bild auch noch gestrecht wird

Ich frag mich eh was bei Willie passiert wenn ein Bild die Dimension seines TImage sprengt.
Für Preview anzeigen nutz ich generell stretch, auch wenn es das Bild verzerrt.

Willie1 19. Jun 2022 09:14

AW: Größe eines Bildes auf TImage
 
Hallo, der Hintergrund meiner Frage war, dass ich GDI+ benutze und da gibt es kein Center und Streched. Ich weiß jetzt, wie es geht. Man muss die Ratio des Originalbildes berechnen und berücksichtigen, falls das Bild im Hochformat ist. Zur Vorschau, benutze ich die eingebetteten Thumnails, falls vorhanden. Das geht sehr schnell.
Gruß Willie.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:04 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz