Вниз
Скачать: CL | DM;

IdFTP проблема синдикатором закачки   Найти похожие ветки 

← →
mrKaktus   (2007-11-17 13:40) [0]

Здравствуйте! использую Indy 10 для приема и отправки файлов по FTP. Проблема в следующем: при орправке файла на сервер не отображается процесс закачки:

procedure TForm3.fputWorkBegin(ASender: TObject; AWorkMode: TWorkMode;
 AWorkCountMax: Integer);
begin

form3.AdvProgressBar1.Max :=AWorkCountMax;
 form3.ProgressBar1.Position := 0;
 form3.ProgressBar1.Visible := true;
end;

procedure TForm3.fputWork(ASender: TObject; AWorkMode: TWorkMode;
 AWorkCount: Integer);
begin

form3.ProgressBar1.Position:=aworkcount;

end;

procedure TForm3.fputWorkEnd(ASender: TObject; AWorkMode: TWorkMode);
begin

form3.ProgressBar1.Visible := false;

end;


Получается следуещее: показывается прогрессбар (WorkBegin) и тутже пропадает (WorkEnd). Куда девается (Work)? Хотя закачка файла на сервер продолжается, индекатора так и не видно.

Тоже самое делаю для приема файлов. Здесь все работает как положено.

Если кто знает в чем дело, подскажите пожалуйста.


← →
Сергей С.   (2007-11-17 16:35) [1]

Если мне не изменяет память, эти обработчики вызываются в доп.потоке, со всеми вытекающими последствиями.


← →
mrKaktus   (2007-11-18 00:05) [2]


> Сергей С.   (17.11.07 16:35) [1]
> Если мне не изменяет память, эти обработчики вызываются
> в доп.потоке, со всеми вытекающими последствиями.


А можно ли это побороть?


← →
Сергей С.   (2007-11-18 16:54) [3]

"Побороть" что ?


← →
mrKaktus   (2007-11-18 19:45) [4]

Что можно сделать, чтобы прогрессбар отображал ход передачи файла на сревер? И почему интересно при скачивании с сервера прогрессбар работает?


← →
Сергей М. ©   (2007-11-19 08:27) [5]


> почему интересно при скачивании с сервера прогрессбар работает


Потому что так реализован компонент TIdTCPConnection.


← →
mrKaktus   (2007-11-21 20:20) [6]

Может посоветуете что можно сделать, что бы всетаки индикатор работал.



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

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



Память: 0.46 MB
Время: 0.007 c
15-1222602793
Дмитрий С
2008-09-28 15:53
2008.11.30
Молчаливый OleVariant


15-1222537509
Городской Шаман
2008-09-27 21:45
2008.11.30
А зачем линуксоидам Delphi?


2-1224233625
Vlad Oshin
2008-10-17 12:53
2008.11.30
как Определить активное окно, но хитро - позже клика?


2-1224507050
Игорь
2008-10-20 16:50
2008.11.30
Как определить заглавная буква или нет


15-1222826765
Slider007
2008-10-01 06:06
2008.11.30
С днем рождения ! 1 октября 2008 среда




   Наверх