Delphi7_VCL线程的使用（一）

1、TThread类的属性

　　（1）FreeOnTerminate属性

　　该属性用于指定当前的线程终止时是否自动删除线程对象。默认值为true。

　　语法：

 1 Property FreeOnTerminate:Boolen; 

　　（2）priority属性

　　该属性用设置线程的优先级，线程的优先级是对同一进程的其他优先级而言的。

　　语法：

1 Property priority:TThreadPriority; 

　　指定线程的优先级为低，代码如下：

1 var
2     SecondProcess:TMyThread; 
3 begin 
4     SecondProcess:= TMyThread.Create(True);        
5     SecondProcess.Proroty:= tpLower;
6     SecondProcess.Resumer;;
7 end