![]() |
Andorra 2d StretchDraw
Hallo Leute!
Also irgendwie finde ich, dass manche Sachen, die Andorra 2d betreffen besser erklärt werden sollten. So steht im 2. Tutorial die Aufforderung die vielen Funktionen doch einmal auszuprobieren. Da ich ein Bild verkleinert zeichnen will, benutze ich natürlich die Funktion StretchDraw.
Delphi-Quellcode:
So weit so gut, aber was soll ich denn als DestRect angeben? Ich habe sämtliche Internetseiten durchstöbert, aber nirgends finde ich eine passende Erklärung beziehungsweise ein Beispiel.
procedure StretchDraw(Dest:TAdDraw;const DestRect:TAdRect;PatternIndex:integer);
Delphi-Quellcode:
Was muss ich jetzt an Stelle des "x" hinschreiben?
AdImageList.Find('Bild').StretchDraw(AdDraw,x,0)
Danke schonmal für die Antworten |
AW: Andorra 2d StretchDraw
Eine kurzer Blick in die Dokumentation...
![]() ...und dann eine kurze Suche nach "AdRect"... ![]() ...liefert dir einen Verweis auf die Funktion "AdRect" aus der Unit "AdTypes"... ![]() die eine TAdRect Struktur, die von der StretchDraw Funktion gebraucht wird, zurückliefert. Einfach die Koordinaten, wohin du dein Bild haben willst angeben (X1, Y1, X2, Y2) Oder du verwendest die Funktion AdBounds (jaja, ich gebe zu, das ist jetzt nicht so einfach zu finden... ;-)), wo du einfach X, Y, Breite und Höhe angeben kannst, und du bekommst ein entsprechendes Rechteck in der TAdRect Struktur zurück. Lange rede, kurzer Sinn, schreib einfach
Delphi-Quellcode:
TAdImage.StretchDraw(AdDraw, AdBounds(x, y, w, h), 0);
|
AW: Andorra 2d StretchDraw
Achso....Ich war da tatsächlich gelandet (also in der Documentation), konnte aber nicht viel damit anfangen, weil ich nicht wusste - beziehungsweise gar nicht auf die Idee kam - dass man eine Funktion als Parameter benutzen kann.
Na dann tut es mir leid und ich nehme alles zurück :-). Danke für die rasche, einfache Antwort. |
AW: Andorra 2d StretchDraw
Kleine Korrektur: Man kann nur selten "eine Funktion als Parameter benutzen" - und das wird hier auch nicht getan.
Eine Funktion hat aber einen Rückgabewert, der sich als Parameter einer anderen Funktion benutzen lässt. ;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:53 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 by Thomas Breitkreuz