TThread2008-04-04TThread是一个抽象类,可以创建几个独立的线程。类关系 TObject在一个多线程的应用程序中创建一个TThread的后子类代表一个线程。每一新子类的TThread对象的实例是一个新的线程。从TThread派生的多线程实例可以构成Delphi的多线程应用程序。当一个应用程序运行时,应用程序就被载入内存准备执行。此时,它成为包含一个或多个线程的进程,每个线程含有数据、代码和系统资源。线程执行应用程序的部分内容,并由系统分配CPU时间。同一进程的所有线程共享同一地址空间,可以访问进程的全局变量。线程通过以下工作改善应用的性能:管理多通信设备的输入。区分任务的优先级。优先级高的处理紧急的任务。优先级低的处理其他任务。以下是使用线程的一些建议:同时跟踪太多的线程消耗CPU时间。对单处理器系统,一个进程最多有16个线程。当多个线程更新相同的资源时,应使线程同步以避免冲突。大多数访问VCL对象和更新窗体的方法必须从主VCL线程内部调用。以下为创建和使用一个新线程的过程:(1)单击File|New|Thread菜单项,创建一个包含对象的新单元,该对象源于TThread类。(2)定义新线程对象和Create方法。(3)通过插入线程执行时需要的代码定义线程对象和Execute方法。(4)将使用VCL组件的任何调用传递给Synchronize方法,以避免多线程冲突。属性列表FreeOnTerminate 线程终止时该对象是否自动删除Handle 包含线程句柄Priority 确定该线程相对于进程中其他线程的优先级ReturnValue 返回线程值Suspended 指示一线程是否被挂起Terminated 表明线程被要求终止ThreadID 标识贯穿系统的线程方法列表~TThread 删除线程对象并释放其战用的内存空间DoTerminate 产生一个OnTerminate事件Execute 提供包含线程执行时所需代码的抽象方法Resume 重新执行一个挂起的线程Suspend 挂起一个运行中的线程Synchronize 在主VCL线程中执行MethodTerminate 将Ternimated属性设置为True通知线程终止TThread 创建一个线程对象的实例WaitFor 等待线程终止并返回ReturnValue属性值事件列表OnTerminateExecute 方法已返回且该线程被删除前发生