Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   Delphi JPG Laden, Grösse anpassen und zentrieren (https://www.delphipraxis.net/217529-jpg-laden-groesse-anpassen-und-zentrieren.html)

H.Bothur 19. Jul 2025 14:27

JPG Laden, Grösse anpassen und zentrieren
 
Moin,

lt. der Google-KI sollte das laden und zentriert ausgeben eines JPGs so funktionieren:

Delphi-Quellcode:
procedure JpgAnzeigen(DateiName: String);
begin
  MultiMPlayer.imgAnzeige.Picture.LoadFromFile(DateiName);
  MultiMPlayer.imgAnzeige.AutoSize := True;
  MultiMPlayer.imgAnzeige.Proportional := True;
  MultiMPlayer.imgAnzeige.Center := True;
  MultiMPlayer.imgAnzeige.Refresh;
end;
Wobei ich das Autosize und zentrieren so verstehe das das Bild auf die Maximalgrösse des TImage skaliert wird. ... Nur, leider funktioniert es nicht sondern das JPG wird immer in Originalgrösse links oben ausgegeben. Woran kann das liegen (oder auch ... wo mache ich den Denkfehler) ?

Gruss
Hans

Uwe Raabe 19. Jul 2025 15:38

AW: JPG Laden, Grösse anpassen und zentrieren
 
AutoSize passt das Image an den Inhalt an. Damit ist Stretch, Proportional und Center wirkungslos. Statt AutoSize setze lieber Stretch := True.

H.Bothur 19. Jul 2025 16:48

AW: JPG Laden, Grösse anpassen und zentrieren
 
Moin,

ich habe jetzt beim TImage folgendes gesetzt:

Autosize: false
Center: true
Proportioal: true
Stretch: true

Trotzdem werden die Bilder in Originalgrösse auf obeln, links gesetzt :-(

Hans

Cypheros 19. Jul 2025 17:54

AW: JPG Laden, Grösse anpassen und zentrieren
 
Liste der Anhänge anzeigen (Anzahl: 1)
TImage

AutoSize := False;
Center := True;
Proportional := True;
Stretch := True;

Anhang 57683

H.Bothur 20. Jul 2025 11:02

AW: JPG Laden, Grösse anpassen und zentrieren
 
Spannend - in einem Testprogramm funktioniert es genau so ... dann geh ich mal suchen wo mein Denkfehler ist.

---

Jetzt hat es geklappt, ich hatte Stretch vergessen und Autosize immer noch auf True !

Danke
Hans


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:44 Uhr.

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