Einzelnen Beitrag anzeigen

Benutzerbild von Martin K
Martin K

Registriert seit: 20. Okt 2005
919 Beiträge
 
Turbo Delphi für Win32
 
#1

Problem: Canvas zeichnet nicht!

  Alt 28. Apr 2006, 17:39
Hi,
ich habe folgendes Problem:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
  Label1.Font.Color := clRed;
  Label1.Canvas.Pen.Color := clGreen;
  Label1.Canvas.MoveTo(0, 0);
  Label1.Canvas.LineTo(20, 10);
end;
Wenn ich auf den Button klicke, wird nur die Schriftfarbe rot.
Erst beim zweiten Klick auf den Button wird die grüne Linie gezeichnet.

Woran liegt das?
Wie kann ich das ändern?????
Mit den Menschen ist es wie mit Computern -
es gibt Nullen und Einsen.
  Mit Zitat antworten Zitat