Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi grafik proportional wie im Photoshop ausschneiden??? (https://www.delphipraxis.net/117700-grafik-proportional-wie-im-photoshop-ausschneiden.html)

artawa 23. Jul 2008 18:35


grafik proportional wie im Photoshop ausschneiden???
 
hi,

habe schon einiges an math-formel ausprobiert aber ich komme einfach nicht dahinter....

quelle.pic.width := zb. 1300;
quelle.pic.height := zb. 950;

ziel.pic.width := 720; fester wert
ziel.pic.height := 400; fester wert

wie kann ich jetzt den quelle.pic in den ziel.pic ohne stretchen einfügen, d.h. quelle.pic soll in seiner grösse auf das ziel.pic skaliert werden. X und Y von quelle.pic sollen proportional bleiben, aber nicht gestretcht werden. Ich meine auch nicht: einfach 720x400 aus dem quelle.pic ausschneiden.

mir ist aber schon klar, dass nur ein teil von quelle.pic übernommen werden kann, da die Seiten proportional bleiben sollen.

ich habe hier im forum ein beispiel gefunden, dass es fast richtig macht:
http://www.delphipraxis.net/internal...t=proportionen
leider wird hier das ziel.pic gestretcht.

es gibt im Photoshop die "CROP" Funktion, mit diesen seltsamen Zeichen. Da kann man auch die gewünschten XY Angaben machen, bevor man anfängt aus dem quelle.pic zuschneiden. daraus kommt dann das ziel.pic mit den gewünschten XY Werten.

ich hoffe ich konnte verständlich erklären um was es mir geht.

vielleicht hat jemand eine Idee?

Khabarakh 23. Jul 2008 18:58

Re: grafik proportional wie im Photoshop ausschneiden???
 
Da gibt's keine großen Formeln ;) .
Du berechnest ziel.Width / quelle.Width und das gleiche mit ".Height". Das größere ist dein Streckfaktor.

Khabarakh 23. Jul 2008 19:04

Re: grafik proportional wie im Photoshop ausschneiden???
 
[gelöscht]Der Edit-Button ist schwer zu treffen :duck: . [/gelöscht]


Alle Zeitangaben in WEZ +1. Es ist jetzt 11:00 Uhr.

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