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]

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

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

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

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

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

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