VPF::Помогите разобраться с IdTCPClient - Форум программистов

artsb

Дата 7.4.2009, 19:21 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64

Приветствую всех.
Исправил проблему, о которой писал писал в теме "Показать главную форму" (избавился от потока).
Теперь нужно как-то отобразить процесс загрузки файла...
IdTCPClient лежит на главной форме, которую не видно. Прогресс (pbProg) лежит на другой форме (fGetT).
В справке к Indy написано:

Цитата

OnWork is generally used to control the update of progress indicators or GUI components.

Я сделал так:

Код


void __fastcall TfMain::IdTCPClient1WorkBegin(TObject *Sender,
      TWorkMode AWorkMode, const int AWorkCountMax)
{
if(AWorkMode == wmRead && fGetT && fGetT->Visible)
{
  fGetT->pbProg->Position = 0;
  fGetT->pbProg->Max = AWorkCountMax;
}
}
//---------------------------------------------------------------------------

void __fastcall TfMain::IdTCPClient1Work(TObject *Sender, 
      TWorkMode AWorkMode, const int AWorkCount)
{
if(AWorkMode == wmRead && fGetT && fGetT->Visible)
{
  fGetT->pbProg->Position = AWorkCount;
  fGetT->pbProg->Update();
  Application->ProcessMessages();
}
}

Не работает...
Точнее, прогресс сдвигается на 5-10% и всё.
Засовывал вызов чтения потока в отдельный поток. Тоже самое.

Помогите разобраться и сделать человеческое отображение прогресса.

--------------------

Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »