[ApplicatiOn]

помогите с потоком.. создал поток 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.

что не так? и как подключить поток?