Du solltest nicht die GET-Methode, sondern die HEAD-Methode benützen, um an den HTTP Status zu kommen:
Delphi-Quellcode:
function GettHTTP_Status(
const URL:
String):
String;
// Ersatz für ReadReturncode
begin
try
Result := idHTTP1.Head(
URL);
except
E:
Exception do
result := E.
Message;
end;
end;
So wird nicht das ganze Dokument, sondern nur der Status (200 = OK, 404 = nicht vorhanden, ...) abgerufen.
Das ist viel schneller