Прогресс бар при дайнлоаде

← →
Builder © (2002-06-21 13:34) [0]

Как бы реализавать сабж, если я тяну файл по http простым get.
(как понятно, должно в процентах показываться, скоклько икачало из скольки)
Если сколько я еще определить в горем пополам спогу, то из скольки - %(
А обычный експлорере такое делает...

← →
jetage (2002-08-15 06:26) [1]

А разве при передаче файла по http в заголовках не передаеться его имя и размер????

← →
Yuriy © (2002-08-15 14:03) [2]

Я использую NMHttp...

procedure TForm1.NMHTTP1PacketRecvd(Sender: TObject);

begin
if ProgressBar1.Position = 0 then
ProgressBar1.Max := NMHTTP1.BytesTotal;
if (NMHTTP1.BytesRecvd < ProgressBar1.Max) and (NMHTTP1.BytesRecvd > ProgressBar1.Position) then
begin
ProgressBar1.Position := NMHTTP1.BytesRecvd;
Label1.Caption := IntToStr(ProgressBar1.Position) + " байт"
end;
end;

← →
kofman © (2002-08-15 21:19) [3]

Yuriy, пример клевый, но совсем не все серверы тебе вернут NMHTTP1.BytesTotal, т.е. вернут равным 0. Я предполагаю, что это те которые не поддерживают докачку. С проблемо Builder`а сам сталкивался, но так и не решил ее. Что ж делать в таком случае?

← →
Sir Alex © (2002-08-16 04:04) [4]

2 kofman
Делайте как Explorer: Просто по таймеру увеличивайте ProgressBar, вот и весь трабл.

← →
kofman © (2002-08-16 18:41) [5]

Как это по таймеру увеличивать ProgressBar, а если сервер перегружен и данные на какое-то время не поступают? И вообще я же не знаю какого размера сам файл, какой же тут может быть ProgressBar и процент скачивания?

А он когда доходит до максимума сбрасывается на ноль...и опять, по кругу.
В этом режиме ПрогрессБар нужен, что бы показать пользователю, что бровзер еще пытается что-нить скачать...

>Sir Alex. Мы отошли от темы. Вопрос то был не в том что-бы показать что программа что-то делает, а именно отображать прогрес скаченного. Вот как это сделать это и есть проблемма.

А как вообще можно показать прогресс закачки того, размер чего неизвестен? Может разве что анализировать содержимое файла и делать предположения о его длине (или текушем положении)...

Прогресс бар при дайнлоаде Найти похожие ветки