hi,
gib deinem
VCL-Objekt zeit zum Ausführen deiner Draw-Anweisung in den Schleifendurchläufen. Entweder mit
Application.ProcessMesssages // nach Draw für Process-Zeit anstehender Botschaften
oder durch einen direkten Aufruf zum Zeichnen nach Draw mittels Invalidate oder Refresh.
Gruß oki