Delphi 用TThread如何判斷線程是否存在 並且釋放線程

標籤：

　　判斷線程是否存在使用：

if Assigned(workThread) thenbegin    //do workend;

　　釋放線程使用：

　　可以使用線程對象自動釋放，使用：workThread.FreeOnTerminate := true;

　　如果想自己釋放線程則應該先判斷線程是否存在和是否結束然後再釋放，使用

if Assigned(workThread) and (not workThread.Finished) thenbegin    //workThread.terminate;    //停止線程    //workThread.suspended;    //使線程暫停    workThread.Free;    //    釋放線程end;

　　

Delphi 用TThread如何判斷線程是否存在 並且釋放線程