怎样在线程内部知道线程结束了?
procedure Terminate; override; 不能覆盖

[解决办法]
属性：Terminated
Execute过程结束，线程就结束了
[解决办法]
if Terminated then
...

为真就表示结束了
[解决办法]
Terminated=true
就结束了。
[解决办法]
判断创建线程的句柄是否为零
[解决办法]
terminated 表示线程是否强行终止
Finished表示是否运行结束