Thema: Delphi Schleifen und break;

Einzelnen Beitrag anzeigen

Benutzerbild von FAlter
FAlter

Registriert seit: 21. Jul 2004
Ort: Ostfildern
1.096 Beiträge
 
FreePascal / Lazarus
 
#5

Re: Schleifen und break;

  Alt 10. Okt 2007, 19:12
Hi,

wenn es ums Beenden geht:
Delphi-Quellcode:
for i := 1 to 10000 do
begin
  DoSomethingWith(i);

  Application.ProcessMessages;
  if Application.Terminated then
    break;
end;
Zum Abbruch wären möglich:
break - Schleife verlassen
exit - procedure / function verlassen
abort - mehrere proceduren / functionen auf einmal verlassen

In allen drei Fällen wird eventueller Code zwischen finally und end noch ausgeführt.

Bei Abort ist es wichtig, dass keine try-except-Blöcke vorkommen, welche EAbort behandeln, ohne sie erneut auszulösen. (Einer der Gründe, weshalb man bei try..except..end möglichst on EConvertError do ... verwenden sollte).

Mfg
FAlter
Felix Alter
  Mit Zitat antworten Zitat