Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Сети";
Текущий архив: 2007.10.21;
Скачать: [xml.tar.bz2];

Вниз

Как отобразить ход выполнения закачки 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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.043 c
2-1191036769
Arkadiy
2007-09-29 07:32
2007.10.21
числа в строковом поле


15-1190295780
S@shka
2007-09-20 17:43
2007.10.21
Утилита досупа к MS SQL ?


2-1191245945
Light-blr
2007-10-01 17:39
2007.10.21
Потеря фокуса формой при вызове другой формы в OnActivate


1-1186583018
ExMiST
2007-08-08 18:23
2007.10.21
сессионные переменные, Delphi, CGI


15-1190138260
Mozart
2007-09-18 21:57
2007.10.21
знатели Exchange!!! ПОМОГИТЕ!!!!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский