Und warum zeigst du uns dann Code einer Verzweigung?
Delphi-Quellcode:
for i := 0 to 9 do
begin
Application.ProcessMessages;
if bCancel = True then
break;
/// tu was
end;
bCancel ist eine globale Variable, die du mit einem Button oder was weiß ich setzten kannst.