标签：
判断线程是否存在使用：
if Assigned(workThread) then
begin
//do work
end;
释放线程使用：
可以使用线程对象自动释放，使用：workThread.FreeOnTerminate := true;
如果想自己释放线程则应该先判断线程是否存在和是否结束然后再释放，使用
if Assigned(workThread) and (not workThread.Finished) then
begin
//workThread.terminate; //停止线程
//workThread.suspended; //使线程暂停
workThread.Free; // 释放线程
end;
Delphi 用TThread如何判断线程是否存在 并且释放线程
标签：
原文地址：http://www.cnblogs.com/xumenger/p/4420983.html
