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

Вниз

Как отобразить ход выполнения закачки IdFTP?   Найти похожие ветки 

 
anis   (2006-11-13 13:38) [0]

Как отобразить ход выполнения закачки IdFTP через ProgressBar?


 
Dmitrij_K   (2006-11-13 13:45) [1]

OnWorkBegin OnWork


 
anis   (2006-11-13 14:06) [2]

А как узнать количество уже отправленных байтов?


 
Dmitrij_K   (2006-11-13 14:15) [3]

см. Demo FTPClient
http://www.indyproject.org


 
Anatoly Podgoretsky ©   (2006-11-13 15:02) [4]

> anis  (13.11.2006 14:06:02)  [2]

А что за параметры у обработчика, смотрел? В справке конечно.

--


 
anis   (2006-11-13 15:19) [5]

Огромное спасибо.
Понял: AWorkCount - то что нужно.


 
DiX ©   (2007-02-22 23:14) [6]

procedure TUpdateForm.IdFTPWorkBegin(Sender: TObject; AWorkMode: TWorkMode;
 const AWorkCountMax: Integer);
begin
ProgressBar1.Position:=0;
ProgressBar1.Max:=AWorkCountMax;
Application.ProcessMessages;
end;

procedure TUpdateForm.IdFTPWork(Sender: TObject; AWorkMode: TWorkMode;
 const AWorkCount: Integer);
begin
ProgressBar1.Position:=AWorkCount;
Application.ProcessMessages;
end;


Затем использую IdFTP.Get(), но индикации процесса закачки не происходит, что я делаю не так?


 
Плохиш ©   (2007-02-26 02:01) [7]


> DiX ©   (22.02.07 23:14) [6]

Перед передачей файла запоминай его размер, и если в IdFTPWorkBegin AWorkCountMax будет равно нулю или меньше, то устанавливай в ProgressBar1.Max сохранённый ранее размер файла.



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

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

Наверх




Память: 0.48 MB
Время: 0.031 c
2-1190362266
АндрейК
2007-09-21 12:11
2007.10.21
Delphi7 и FastReport 3.19


4-1177198354
nikitozz
2007-04-22 03:32
2007.10.21
Как завершить процесс.


1-1186312251
fd979
2007-08-05 15:10
2007.10.21
ТЕlSideBar


8-1168425391
cautur
2007-01-10 13:36
2007.10.21
Запись разговора


15-1190031263
_aqtime_
2007-09-17 16:14
2007.10.21
Профилировка aqtime