Registriert seit: 23. Jan 2008
3.686 Beiträge
Delphi 2007 Enterprise
|
AW: Move eines TImage
27. Jun 2013, 22:16
Da die nächste Frage vermutlich wird: "Wie speicher ich mehrere Images in einer Datei ab?": Gar nicht, der Ansatz ist dafür ungeeignet. (Man könnte einen Screenshot des Formulars machen und auf die Grenzen der Images zurecht schneiden, aber das ist zum schütteln.)
Der richtige(re) weg wäre das Weglassen von TImage, und statt dessen alles auf einer Paintbox zu malen. Die Einzelbilder sollte man sich in eigenen kleinen Klassen bereit halten, die zum einen ein TBitmap mit dem Bild, zum Anderen die X- und Y-Koordinaten (und ggf. Skalierung) beinhaltet. Dazu noch eine kleine Manager-Klasse, die das Selektieren und Bewegen von den Bildern kapselt, und das Ergebnis auf einen beliebigen Canvas blitten kann (zum Zeichnen auf die Paintbox oder ein TBitmap zum speichern z.B.), und schon wird die Nummer deutlich sauberer und handlicher.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)
|