Тема: поткоки
Показать сообщение отдельно
  #1  
Старый 04.02.2009, 08:48
ApplicatiOn ApplicatiOn вне форума
Активный
 
Регистрация: 28.02.2008
Сообщения: 388
Репутация: -10
По умолчанию поткоки

помогите с потоком.. создал поток New>...Object Thread

обозвал var TmTh;
написал свою процедуру

Код:
procedure lalalal;
begin
///
end;


в потоке (Unit2) написал так:

Код:
procedure TMTh.Execute;
begin
 while not Terminated do
   if b=true  then Synchronize(Form1.lalalal)
end;

b - перем. типа boolean (под private)

компилятор ругается на Form1.

что не так? и как подключить поток?
Ответить с цитированием