Entwickler-Ecke

Multimedia / Grafik - Ursprungszustand von TImage


Roux - Di 01.07.08 15:56
Titel: Ursprungszustand von TImage
Hi!
Wenn ich mittels Bild.Canvas.LineTo(...), ... auf einen TImage "drauf gemalt" habe, kann ich das Bild wieder in den Ursprungszustand zurückversetzen bzw. den Wert bei Picture neu setzen?

Roux


Marc. - Di 01.07.08 16:09

Hi!
Du könntest theoretisch ein zweites transparentes Image zum Malen auf das HinterGrund-Image drauflegen. Dann würde der vorherige Zustand immer erhalten bleiben und Du bräuchtest lediglich das zweite Image zu übermalen.

Delphi-Quelltext
1:
 img.Canvas.FillRect(rect(0,0,img.Width,img.Height));                    

Ich will jetzt aber nicht behaupten, dass das die Optimal-Lösung ist. :)

Grüße,
Marc.


ZeitGeist87 - Di 01.07.08 16:13

kürzer: image1.Canvas.FillRect(image1.Canvas.ClipRect); :mrgreen:


Roux - Di 01.07.08 16:42

Die Idee mit der Transparenz hatte ich auch schon - hab ne andere Lösung gefunden:

Delphi-Quelltext
1:
Bild.Picture.Bitmap.LoadFromFile('Test.png');                    


Narses - Di 01.07.08 16:51

Moin!

user profile iconRoux hat folgendes geschrieben:

Delphi-Quelltext
1:
Bild.Picture.Bitmap.LoadFromFile('Test.png');                    
Mach das mal lieber so: :idea: ;)

Delphi-Quelltext
1:
Bild.Picture.Bitmap := NIL;                    
cu
Narses