|
Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.600 Beiträge
Delphi 12 Athens
|
Re: Application beenden, wärend Procedure
7. Jan 2008, 08:45
Vielleicht so in der Art:
Delphi-Quellcode:
abgebrochen := false;
repeat
bt_weiter.Enabled:=true;
repeat
application.ProcessMessages;
if abgebrochen then break; //verlässt die innere Schleife
sleep(10);
until b_fertig;
b_fertig:=false;
until set_pop3 or abgebrochen; //verlässt ggf. die äußere Schleife
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|