Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Подождать окончяние THread-a


Страницы:   1 2 3

alles ©   (2006-08-03 14:40:00) 

Здраствуйте.
Я с THread-ами не так хорошо знаком и попрошу у Вас помощь.
На клиенте вызывается прцедура которая находится на сервере, это занимает много времени. Чтобы юзеру показать что программа не умерла, создал форму (FrmWait) на которой находится TImage где по таймеру меняются 3 картинки (ролик маленкий).
Делаю так:
GlobalsVar.UserId:=0; //integer variable
try
          Application.CreateForm(TFrmWait, FrmWait);
          FrmWait.Show;
{В этом THread-e получяем GlobalsVar.UserId}
          ThreadConnect := TConnectThread.Create;
{как ожидать тут окончяние ThreadConnect-а и потом продолжить с if-ом ?}
          if (GlobalsVar.UserId= 0) then
          ShowMessage('Error');
finally
             FrmWait.Release; FrmWait:=nil;
end;

при деббугер-е запускает TConnectThread и сразу программа пытается проверить GlobalsVar.UserId на 0 которая еще небыло присвоенно в TConnectThread.

Спасибо


Сергей М.   (2006-08-03 14:42:00) [41]

метод TThread.WaitFor на то существует.


Страницы:   1 2 3

Наверх

Титульная страница Поиск, карта сайта Написать письмо