Определить размер файла перед скачиванием.

[kalexi]

Как правильно определить размер файла перед скачиванием?
Юзал: InternetQueryDataAvailable - он выдает неверный результат
HttpQueryInfo - почти никогда не принимает от сервера размер.

Может я что-то не так делаю? Подскажите как правильно?

[Квэнди]

Сначала почитайте спецификацию протокола HTTP.
Удаленный сервер ниего не знает о файле на вашем компьютере пока его себе не закачает.

[kalexi]

Кхе, я его не закачиваю, а скачиваю.

[Квэнди]

Сообщение от Квэнди

Сначала почитайте спецификацию протокола HTTP.
Удаленный сервер ниего не знает о файле на вашем компьютере пока его себе не закачает.

Читаем второй раз, только теперь внимательно

[FaTaL]

Тогда как качалки, не скачав файл показывают его размер?

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

Тогда как качалки, не скачав файл показывают его размер?

HTTP метод HEAD
в поле Content-Length вернет размер контента.

[FaTaL]

Может подскажите рабочий пример на Delphi
Желательно функцию или процедуру

[Usov]

я тебе могу посоветовать пока только инди, используй компонент TidHttp для передачи запроса. Примеров использования можешь найти много.

[FaTaL]

Вот нашёл рабочий пример, если кому надо:

uses
 IdTCPConnection, IdComponent, IdBaseComponent, IdHTTP, IdTCPClient;

......................

procedure TForm1.Button1Click(Sender: TObject);
var
  HTTP : TidHTTP;
  Razmer : int64;
begin
 HTTP := TIdHTTP.Create(nil);

 HTTP.Head('Адрес интересующего файла');
 Razmer := HTTP.Response.ContentLength; //размер файла
 HTTP.Free;
 Razmer := Round (Razmer / 1024);
 ShowMessage (IntToStr (Razmer) + ' KB');
end;

[unreal2x]

UP

всем привет, а вот возник вопросик... что делать если размер файла не получен, а проверку надо продолжить?