1 Button 2 ereignisse

[SirTwist]

Das klappt so nicht, weil Du den Button erst dann wieder drücken kannst, wenn die Schleife zu Ende ist.

Beim Drücken eines Buttons wird die damit verbundenen Ereignisroutine aufgerufen, das OnClick-Event. Solange diese Routine ausgeführt wird, ist die gesamte Oberfläche nicht bedienbar.

Was willst Du denn in Deiner Schleife machen? Vielleicht hilft Dir ein Timer weiter, der z.B. alle 200ms aufgerufen wird und dann jeweils einen Schleifendurchlauf erledigt.

Den Timer kontrollierst Du dann im OnClick-Ereignis Deines Buttons:
Timer.Enabled := not Timer.Enabled; Das sollte so in etwa in die Richtung Deiner Frage gehen...