Boolean check af en URL forespørgel

Hej,

hvordan laver jeg en URL forespørgsel i delphi, så jeg får true hvis en given URL adresse eksisterer og FALSE hvis den ikke gøre...

Har prøvet med følgende muligheder - selvfølgelig hver for sig:

hService := InternetOpenUrl(hSession, PChar(aUrl), nil, 0,INTERNET_FLAG_RELOAD, 0);


result := InternetCheckConnection(PChar(aUrl),0,0);
result := InternetReadFile(hService, @lpBuffer, 1024,dwBytesRead);
result := Assigned(hService);

men "Result" bliver altid TRUE lige meget hvad jeg sender ind i aURL