delphi建立了多執行緒後，要想在執行完成後自動釋放所用的資源，可以在建構函式constructor裡指定
執行緒結束時的執行事件，onterminate:=finishedevent;這樣，當乙個執行緒執行完成後，就會自動呼叫
這個過程，當然，在建構函式裡還必須先有這兩句：inherited create(createsuspended);
freeonterminate := true;讓它自動結束，然後在指定的過程裡設定該執行緒指向nil即可：用下面兩句：
mythread.terminate;mythread:=nil;要釋放特定的資源，可以在destroy事件裡進行，如，使用了資料
庫，可以在destroy裡先關閉資料集，再斷開連線即可，這裡好像先執行的是destroy,然後再執行指定的
過程，如果順序反了的話，可能引起不定的錯誤！
delphi 多執行緒
摘自 萬一的部落格 functionmyfun p pointer integer stdcall var i integer begin fori 0to500000do begin form1.canvas.lock form1.canvas.textout 10,10,inttostr i f...
delphi 多執行緒
看別人的部落格一萬次記憶效果也沒那麼好，還是自己動手寫寫吧！functioncreatethread lpthreadattributes pointer dwstacksize dword lpstartaddress tfnthreadstartroutine lpparameter point...
delphi 多執行緒例項
下面筆者將介紹乙個簡單的例項，解釋和說明前面所述的內容。1 建立form，在其中建立兩個按鈕 開始採集 和 停止採集 新增乙個paintbox1。2 建立乙個新的單元，在其中輸入以下 unit collectthread inte ce uses classes,sysutils,stdctrls,...