¿Como puedo ver las funciones de una Unit?

[Antuan]

Bueno como siempre aprendiendo.
Tengo una funcion de un ejemplo que me chequea una URL en tiempo respuesta.
y me devuelve los codigos de respuesta http.
Esta funcion utiliza en el Uses la WinInet.
Estoy mirando las funciones que tiene la WinInet y no se donde se miran.
Pues quiero cambiar la funcion para que en vez de que me de los codigos. Me de las cabeceras de http como respuesta.
Supongo que se podran ver de alguna manera ¿no?
O si ya hay alguna funcion o un ejemplo que poniendo la direccion de la pagina ne devuelva las cabeceras de http, mucho mejor.
Con un ejemplo aprenderia mejor
A lo mejor es mucho pedir.
La funcion que tengo para aprender es:

Código Delphi [-]
Function CheckUrl(url:string):boolean;
 var
 hSession, hfile, hRequest: hInternet;
 dwindex,dwcodelen :dword;
 dwcode:array[1..20] of char;
 res : pchar;
 begin
   if pos('http://',lowercase(url))=0 then
      url := 'http://'+url;
   Result := false;
   hSession := InternetOpen('InetURL:/1.0',
        INTERNET_OPEN_TYPE_PRECONFIG,nil, nil, 0);
   if assigned(hsession) then
     begin
       hfile := InternetOpenUrl(
            hsession,
            pchar(url),
            nil,
            0,
            INTERNET_FLAG_RELOAD,
            0);
       dwIndex  := 0;
       dwCodeLen := 10;
       HttpQueryInfo(hfile, HTTP_QUERY_STATUS_CODE,
               @dwcode, dwcodeLen, dwIndex);
       res := pchar(@dwcode);
       form1.Memo1.Text:= res;
       result:= (res ='200') or (res ='302');
       if assigned(hfile) then
         InternetCloseHandle(hfile);
       InternetCloseHandle(hsession);
     end;
 end;

Muchas gracias