TImage-Änderung sofort anzeigen

**bombilein**

hallo,

mein erstes Posting und meine erste Frage.

Ich möchte, das ein TImage seine Farbe per Knopfdruck auf das TImage ändert und die neue Farbe soll sofort angezeigt werden.

Im OnClick-Event des TImages schreibe ich folgendes:

markieren

Delphi-Quellcode:

			   TImage(Sender).Canvas.Pen.Color := clBlack;

   TImage(Sender).Canvas.Brush.Color := clRed;

   TImage(Sender).Canvas.Rectangle(0, 0, TImage(Sender).Width, TImage(Sender).Height);

   TImage(Sender).Repaint;

Die Farbe des TImages ändert sich, aber nicht sofort. Sondern z.B. wenn ich das Fenster minimiere und anschließend maximieren. Auch ändert es sich, wenn ich eine anderes Fenster über das TImage ziehe.

Aber die Änderung soll sofort angezeigt werden!

Danke im Voraus

bombi

TImage-Änderung sofort anzeigen

TImage-Änderung sofort anzeigen

Forumregeln