Как узнать размер файла имея его URL

[SeRhy]

Подскажите пожалуйста как узнать размер файла имея его URL.
Зарание спасибо

[KingOfNothing]

используя, например, TIdHTTP и HTTP метод Head, который возвращает хедер урла, но не боди.
Примерный код:

IdHTTP1.Head('http://download.downloadmaster.ru/dm/dmaster.exe');
if IdHTTP1.Response.HasContentLength then
  ShowMEssage(IntToStr(IdHTTP1.Response.ContentLength));

[Пепел Феникса]

предпочитаю использовать этот метод

uses WinInet;

----------------------------

function GetUrlSize(const URL:string):integer;
var
 hSession,hFile:hInternet;
 dwBuffer:array[1..20] of char;
 dwBufferLen,dwIndex:DWORD;
begin
 Result:=0;
 hSession:=InternetOpen('GetUrlSize',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;
   dwBufferLen:=20;
   if HttpQueryInfo(hFile,HTTP_QUERY_CONTENT_LENGTH,@dwBuffer,dwBufferLen,dwIndex) then Result:=StrToInt(StrPas(@dwBuffer));
   if Assigned(hFile) then InternetCloseHandle(hFile);
   InternetCloseHandle(hsession);
  end;
end;