Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.014 c
2-1190706757
Uchenik
2007-09-25 11:52
2007.10.21
Поведение кнопки TToolButton со стилем tbsDropDown


11-1173964445
vampir_infernal
2007-03-15 16:14
2007.10.21
InputBox?


2-1190627006
misha_gr
2007-09-24 13:43
2007.10.21
TClientDataSet.Locate


2-1190362266
АндрейК
2007-09-21 12:11
2007.10.21
Delphi7 и FastReport 3.19


15-1190553780
Альберт_
2007-09-23 17:23
2007.10.21
компрессия-декомпрессия zip. исходники




   Наверх