DoEvents in Delphi

[Sigma.Mue]

Hallo Leute,

ich möchte in einer etwas längeren Routinen dem Benutzer die Möglichkeit bieten die Berechnung mit einem Button zu beenden. Allerdings muß ich dazu irgendwie meine Routine unterbrechen, da sonst keine Events verarbeitet werden. In VB gibt es einen Befehl der heißt DoEvents und macht genau das, was ich brauche. Aber wie geht's in Delphi?

Danke für Tips