Bei Exception Aktion mehrmals versuchen?

[Dax]

Mit einer externen Schleife würde es auch funktionieren.

Delphi-Quellcode:

c := 10;
valid := false;
while (c >= 0) and not valid do begin
  try
    // ...
    valid := true;
  except
    dec(c);
    if c < 0 then
      raise
    else
      Sleep(1);
  end;
end;