Delphi使用API创建多线程应用实例

摘要:Delphi源码,其它类别,创建线程,API 　　这是一个Delphi使用API来创建多线程应用程序的示例。IsDone变量的引入，是为了避免控制台应用的主线程执行结束时，进程中止导致新创建线程中止。——这甚至可能发生在新线程执行writeln()之前。 　　在线程函数中，随时可以调用ExitThread()来退出，或者当代码执行到函数结束关键字时，也将退出该线程；在线程函数之外，可以随时调用TerminateThread (ThreadID)来中止线程。 　　 　　程序运行的结果将是： 　　______________________________________________________ 　　Hi, In MultiThread ... 　　______________________________________________________ 　　 　　这一行输出是在一个新创建的线程中发生的。 　　 来源:源码中心(www.lelecode.com)