Laufende Prozedur abbrechen

[wayne312]

Hey leute,

ich möchte das man auf einen Abbruch Button klicken kann und der dann eine laufende Prozedur stoppt.
Hier ist die Prozedur die angehalten werden soll :

Delphi-Quellcode:

iz := StrToFloat(edit1.Text)*60;
    Zeit:=now+(iz)*(1.0/86400.0);
    while (now<=Zeit) do Application.processMessages;

Wie kann ich das mitten beim Zählen abbrechen/beenden?

Danke...