Schleife on Exception weiterlaufen lassen

[X-Dragon]

Kenn mich damit zwar nicht so aus , aber das da sieht passend aus:

Delphi-Quellcode:

Var sReply : String; 
begin 
  IdHttp.ReadTimeOut := 5000; // 5 Sek. 
  try 
    sReply := IdHttp.Get('http://www.harribo.de/berechne.php?param1=wert1&param2=wert2'); 
  except 
    sReply := 'READTIMEOUT'; 
  end; 
  // jetzt steht in sReply die Serverantwort 
  // weitere Verarbeitungen durchführen 
end;

Quelle: http://www.delphipraxis.net/internal...ct.php?p=75809