Einzelnen Beitrag anzeigen

gandime
(Gast)

n/a Beiträge
 
#3

Re: Application beenden, wärend Procedure

  Alt 7. Jan 2008, 03:31
Das hilft/funktioniert nicht, da das Prog in einer repeat-Schleife steckt wo es nicht raus kommt:

Delphi-Quellcode:
repeat
bt_weiter.Enabled:=true;
  repeat
    application.ProcessMessages;
    sleep(10);
  until b_fertig=true;
  b_fertig:=false;
until set_pop3=true;
ich könnte natürlich überall folgendes hinzufügen:

until (set_pop3=true) or (application.Terminated); Aber da habe ich Angst das etwas am pop3 ausgelöst wird was noch nicht gemacht werden soll wie z.B. eMail löschen oder sowas.

Das könnte man natürlich auch umgehen

Delphi-Quellcode:
if application.terminated then
begin
  exit;
end;
aber bei fast 10000 Zeilen Code habe ich nicht recht viel lust das alles nachzugucken und einzufügen
  Mit Zitat antworten Zitat