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

[Hansa]

Tja, Du willst wahrscheinlich nicht, daß einer den Rechner einfach abschaltet. Dann nimm doch ein ProgressBar, heißt das Ding überhaupt so ? Im Notfall brauchst Du noch einen Abbrechen-Buttton, aber wo ist das Problem ?

[Sigma.Mue]

Tja, ich habe einen ProgressBar und einen AbbrechenButten. Das Problem ist, daß ich während der Ausführung meiner Procedure mit der Maus auf dem AbbrechenButton herumhämmern kann, so lange ich will; das OnClick Event wird erst ausgeführt, wenn meine Procedure fertig ist. Und das Dauert...

[Sebastian Nintemann]

Hi, wenn ich dich richtig verstanden hab sollte Application.ProcessMessages das richtige sein, damit wird die Nachrichtenschleife abgearbeitet (also auch andere Events ausgeführt). KAnnst dann zB. eine Variable setzen, die deine langwierigen Berechnungen abbricht.

Gruß, Sebastian

[Sigma.Mue]

Danke