Ergebnis der Suchanfrage

• Forum: Netzwerke

  AW: Prüfen ob Datei online

    Delphi
    by DeddyH, 23. Mai 2012
  Meine Variante sieht so ähnlich aus, bietet aber auch einen TimeOut an:
  function IsUrlValid(const sUrl: string; CheckTimeout: DWORD = 3000): Boolean;
  var
  hInet, hConnect: HINTERNET;
  StatusCode, dummy, bufLen, Option: DWORD;
  begin
  Result := False;
  hInet := InternetOpen(PChar(Application.Title),
  INTERNET_OPEN_TYPE_PRECONFIG_WITH_NO_AUTOPROXY, nil, nil, 0);
  if Assigned(hInet)...