DELPHI 线程的终止和退出

  

1)自动退出：

　　 一个线程从execute()过程中退出，即意味着线程的终止，此时将调用windows的exitthread()函数来清除线程所占用的堆栈。

　　 如果线程对象的 freeonterminate 属性设为true，则线程对象将自动删除，并释放线程所占用的资源。

　　 这是消除线程对象最简单的办法。

　　 2)受控退出：

　　 利用线程对象的terminate属性，可以由进程或者由其他线程控制线程的退出。只需要简单的调用该线程的terminate方法，并设直线程对象的terminate属性为true。

　　 在线程中，应该不断监视terminate的值，一旦发现为true，则退出，例如在execute()过程中可以这样写：

　　　 while not terminated do

　　　　　 begin

　　　　　　　　 ........

　　　　　 end;　　　　　　　

　　　 3)退出的api 函数：

　　　 关于线程退出的api 函数声明如下：code

　　　 function terminatethread(hthread:thandle;dwexitcode:dword);

　　　 不过，这个函数会使代码立刻终止，而不管程序中有没有

　　　　　　　　　 try....finally

　　　 机制，可能会导致错误，不到万不得已，最好不要使用。

　　 4) 利用挂起线程的方法（suspend）

　　 利用挂起线程的suspend方法，后面跟个free，也可以释放线程，例如：

　　 thread1.suspend;　 //挂起

　　 thread2.free;　　　　 //释放