VPF::IdHTTP - статус загрузки - Форум программистов

slavonX86

Дата 12.3.2006, 12:16 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 15.12.2005

Репутация: нет
Всего: 0

как отобразить статус загрузки документа через IdHTTP

Snowy

Дата 12.3.2006, 17:44 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 53
Всего: 484

OnWorkBegin, OnWork
Поиск по форуму

slavonX86

Дата 18.3.2006, 22:46 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 179
Регистрация: 15.12.2005

Репутация: нет
Всего: 0

Код


procedure THTTP.OnWorkBegin(ASender: TObject; AWorkMode: TWorkMode;
  AWorkCountMax: Integer);
begin
  
end;

AWorkCountMax = 0. Почему ???

Poseidon

Дата 18.3.2006, 23:09 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 4
Всего: 133

Потому что ничего не начал качать.
AWorkCountMax в OnWorkBegin показывает размер закачиваемого файла. Что бы узнать, сколько уже скачалось, используй OnWork

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

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

Rexar

Дата 18.3.2006, 23:54 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 105
Регистрация: 14.12.2005

Репутация: нет
Всего: 0

А как узнать какой размер закачиваемой web-страницы ?

Matematik

Дата 19.3.2006, 00:37 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 24
Всего: 50

Цитата(Rexar @ 18.3.2006, 23:54

)

А как узнать какой размер закачиваемой web-страницы ?

Если сервер сообщает IdHTTP размер скачиваемого файла, то OnWorkBegin+AWorkCountMax.
А если нет, то НИКАК. т.е. только после полной загрузки файла

Код


ShowMessage('Размер web-страницы http://stranica.net равен '+
                         IntToStr(Length(idhttp.get('http://stranica.net')))

Это сообщение отредактировал(а) Matematik - 19.3.2006, 01:02

Poseidon

Дата 19.3.2006, 02:51 (ссылка)

(нет голосов)

Загрузка ...

Delphi developer

Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 4
Всего: 133

Цитата(Rexar @ 18.3.2006, 22:54

)

А как узнать какой размер закачиваемой web-страницы ?

Если это html-страница, то узнать можно так:

Код

function GetInetFileSize(const FileUrl:string):integer;
begin
  Result:=0;
  idHTTP:=TIdHTTP.Create(nil);
  idHTTP.Head(FileUrl);
  Result:=idHTTP.Response.ContentLength; //размер файла
  IdHTTP.Free;
end;

можно, потому что страница html - это тот же файл.

А вот если это php-скрипт, то тут сложнее, т.к. такая страница генерируется сервером на основании php-кода.

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

Если хочешь, что бы что-то работало - используй написанное,
если хочешь что-то понять - пиши сам...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »