Eine Procedure durch Stop Button unterbrechen

[SyntaxXx]

Entweder benutzt du die idThread Komponente oder difinierst einfach einen Type als Thread.
Dann einfach alles in die Thread Funktion packen und über den Button "Start" den Thread starten:

Thread1.resume = true;

oder zum stoppen:

Thread1.terminate = true;


Pausieren:

Thread1.Suspended = true;