Главная страница
    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-1191220673
Дмитрий Иванович
2007-10-01 10:37
2007.10.21
Проблема в Interbase


6-1172234450
Sp1r1t
2007-02-23 15:40
2007.10.21
Передача массива по сети


6-1171820465
Alex Churton
2007-02-18 20:41
2007.10.21
Как создать интерфейс для удалёной железяки?


1-1186147631
Apachi
2007-08-03 17:27
2007.10.21
Как при создании своего компонента переопределить событие


2-1190573837
Ezorcist
2007-09-23 22:57
2007.10.21
Перевод с delphi на turbo pascal





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский