Application.ProcessMessages überflüssig machen

[sh17]

stimmt das denn? auf welchem Canvas malst Du denn?

müsste das nicht so aussehen?

Delphi-Quellcode:

with Sender as TPanel do 
begin
...
end;

Wenn es denn so wäre, würde ich zeichenroutinen in die Paint-Methode der Componente stecken.