procedure TForm1.Button1Click(Sender: TObject);
var
i : integer;
begin
MyThreadList := TThreadList.Create;
for i := 0 to 4 do
MyThreadList.Add(TTestThread.Create(true,label1));
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
MyThreadList.LockList;
TThread(MyThreadList.LockList.Items[0]).Resume;
TThread(MyThreadList.LockList.Items[1]).Resume;
TThread(MyThreadList.LockList.Items[2]).Resume;
TThread(MyThreadList.LockList.Items[3]).Resume;
TThread(MyThreadList.LockList.Items[4]).Resume;
MyThreadList.UnlockList;
end;

TTestThread的Execute有访问到VCL控件
这样的线程调用是否就是安全？如果不安全，如何才安全呢？
第一次研究ThreadList,不知道该怎么用它安全管理线程，谢谢各位指教