Hey,
du kannst ja mal im Einzelschritt "durchsteppen".
Eigentlich müsste EIdSocketError ja auch diese
Exception abfangen.
Delphi-Quellcode:
try
Form1.IdHTTP1.Get(q,FS);
result := '
';
except
on E:EIdHTTPProtocolException
do result := '
HTTP-Fehler: ' + IntToStr(E.ErrorCode);
on E:EIdSocketError
do result := E.
Message;
// Fehler ganz anderer Art??
on E:
Exception do result := '
strange error';
end;
btw. STRG + D formatiert den Quellcode