Delphi tthread类用法：多线程Demo.rar

Delphi tthread类用法实例，一个多线程的Demo源码，lvThread=class(tthread)//定义线程类，constructor lvthread.create();//实现构造 　　begin 　　freeonTerminate:=true;//当执行完后是否自动销毁 　　inherited create(false);//false表示是否挂起，这里直接执行execure方法 　　end; 　　procedure lvthread.Execute;//线成执行实体 　　test.DoTerminate();//销毁，不过我还不知道怎么销毁，哪为知道的请给我留盐