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:
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