Форум: "Начинающим";
Текущий архив: 2006.07.02;
Скачать: [xml.tar.bz2];
Вниз
И снова вопрос о FTP Найти похожие ветки
← →
graf © (2006-06-09 09:22) [0]Работаю с компонентой Indy IdFTP. Получаю размер файла лежащего на ФТП сервере функцией Size. А как получить объем данных в момент скачивания файла?
← →
Palladin © (2006-06-09 10:57) [1]TIdFTP.OnWork
← →
graf © (2006-06-09 11:28) [2]Пишу вот так:
procedure TForm1.IdFTP1WorkBegin(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCountMax: Integer);
begin
pbProgress.Max := AWorkCountMax;
pbProgress.Position := 0;
end;
procedure TForm1.IdFTP1Work(Sender: TObject; AWorkMode: TWorkMode;
const AWorkCount: Integer);
begin
pbProgress.Position := AWorkCount;
end;
Но работать отказывается, файл с сервака копируется а в прогрессе просто ничего не происходит. В чем может быть дело?
← →
Palladin © (2006-06-09 13:59) [3]дело может быть в том что не вызываешь Application.ProcessMessages
← →
pargo © (2006-06-09 14:40) [4]Скорее всего AWorkCountMax=0.
← →
Palladin © (2006-06-09 15:15) [5]да, и в этом тоже...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.07.02;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.011 c
