Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.30;
Скачать: CL | DM;

Вниз

ProgressBar для закачки файла с HTTP   Найти похожие ветки 

 
Yurko ©   (2004-04-14 17:27) [0]

Привет!
Нужно чтоб программа качала с HTTP-сервера zip-файлы.
Я делаю это через NMHTTP:
NMHTTP.Get("http://someserver/somefile.zip");
Вопрос:
 как сделать прогрессбар, отображающий ход закачки файла?
 если для NMHTTP это невозможно, то каким способом качать?


 
Smithson ©   (2004-04-14 18:00) [1]

OnReceived или что-то вроде у него есть?
Почитай help по компоненту, тебе нужно событие, периодически возникающее при приеме данных. Ыщщы.


 
AndersoNRules ©   (2004-04-14 19:13) [2]

Nu vi dayote.  U NMHTTP esti svoystva:
NMHTTP1.BytesSent:Integer;
NMHTTP1.BytesTotal:Integer;
NMHTTP1.BytesTotal:Integer;
atovo vpolne hvatit dlya horoshevo progress bara.
realizazzia, tochnee odin iz mnogih metodov:
procedure TForm1.ProgressWatch;
begin
Form1.ProgressBar1.Position:=Round(100*NMHTTP1.BytesRecvd/NMHTTP1.BytesTotal);
end;

teperi, sozdayeom naslednik klassa TThread:  
TProgressThread = class(TThread)
    ...
procedure TProgressThread.Execute;
begin
{ Place thread code here }// ato yasno
end;

v moment nachala zakachki sozdayeoshi Thread i zapuskayeshi,tak:
var Tp : TProgressThread;
...
Tp:=TProgressThread.Create(true);
Tp.Priority:=tpLower; // atovo hvatit
Tp.Resume;


Vrode nigde ne oshybsya.


 
AndersoNRules ©   (2004-04-14 20:18) [3]

Kstati a kuda tvoy NMHttp sohranyaet files ?
A konektizza nado?


 
Yurko ©   (2004-04-15 13:20) [4]

Спасибо за ответ!

Принятые данные сохраняются в файл имя которого содержит NMHTTP.Body (при NMHTTP.InputFileMode = True).

Коннект происходит внутри метода NMHTTP.Get



Страницы: 1 вся ветка

Текущий архив: 2004.05.30;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.036 c
6-1081457153
Raptoridze
2004-04-09 00:45
2004.05.30
Twebbrowser


14-1084304416
proteste
2004-05-11 23:40
2004.05.30
Сам спросил сам ответил. Почему?


3-1083863372
DenKop
2004-05-06 21:09
2004.05.30
Как почитать Advantage Table (*.adt) таблицу?


3-1083836197
Pul
2004-05-06 13:36
2004.05.30
DBGrid и редактирование lookup полей


14-1084428741
Knight
2004-05-13 10:12
2004.05.30
Кто знает Word? Сам редко с ним общаюсь...