Главная страница
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.034 c
7-1082383492
Super-Mario
2004-04-19 18:04
2004.05.30
Инжектор, ЭБУ


1-1084982628
Wontar
2004-05-19 20:03
2004.05.30
Как пребразовать wParam к Char ...


14-1084259673
vidiv
2004-05-11 11:14
2004.05.30
AT команды телефона LG G5300


3-1084362064
SergeyM
2004-05-12 15:41
2004.05.30
ADOConnection.


8-1078420914
miek
2004-03-04 20:21
2004.05.30
DirectDraw: создание поверхностей