关于多线程的问题

Question

用按钮触发一个线程和其他语句，请问如何才能让线程先执行完然后再执行下面的语句？

Answer 1

为什么我写a:TEvent时不行？是不是要引用什么单元？

Answer 2

我晓得F1是什么了，可我还是不晓得Event是怎么用的

Answer 3

转贴：等待线程结束如果要等待一个线程结束，可以这样做：
在线程得私有变量中申明：
FEvent:TSimpleEvent;
published部分：
property Event:TSimpleEvent read FEvent;Create中：
FEvent:=TSimpleEvent.Create;Destroy中：
FEvent.Free;在Execute中的第一行：
FEvent.ResetEvent;
在线程得结束（一般是最后一行代码）后添加：
FEvent.SetEvent;然后在另外需要等待线程结束的地方把原来的
WaitForSingleObject(AThread.Handle,????)改成WaitForSingleObject(AThread.Event.Handle)即可。