Einzelnen Beitrag anzeigen

bombilein

Registriert seit: 21. Jul 2004
18 Beiträge
 
#1

TImage-Änderung sofort anzeigen

  Alt 21. Jul 2004, 14:34
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
  Mit Zitat antworten Zitat