ping host + socketfehler

[bjacke]

P.S.
Habe das hier gefunden: (mit Indy IdHttp)

Delphi-Quellcode:

function Ping(Host: String):string;
Begin
  try
   idhttp.Get(host);
   result:='online';
  except
   on EIdFileNotFound do
   result:='offline';
  end;
end;