快速业务通道

TThread

作者 佚名技术 来源 程序设计 浏览 发布时间 2012-06-30

TThread是一个抽象类,可以创建几个独立的线程。

类关系 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线程中执行Method

Terminate 将Ternimated属性设置为True通知线程终止

TThread 创建一个线程对象的实例

WaitFor 等待线程终止并返回ReturnValue属性值

事件列表

OnTerminateExecute 方法已返回且该线程被删除前发生

属性

TThread::FreeOnTerminate

__property bool FreeOnTerminate = {read=FFreeOnTerminate,write=FFreeOnTerminate,nodefault};

确定当线程终止时,该线程对象是否自动删除。

FreeOnTerminate默认值为False,线程对象必须在代码中显示删除。

包含线程句柄。

当调用Win32API函数处理线程时,使用Handle.

TThread::Priority

__property TThreadPriority Priority = {read=GetPriority,write=SetPriority,nodefault};

确定该线程相对于进程中其他线程的优先级。

Priority属性为一枚举类型,其默认为tpNormal.

TThreadPriority类型定义了TThread组件的Priority属性的可能值,如下表所述。Windows根据优先级确定每一个线程的CPU周期。

_____________________________________________________________________

值           含义

_____________________________________________________________________

tpIdle 只有当系统空闲时该线程执行

tpLowest 线程优先级比正常低2点

tpLower 线程优先级比正常低1点

tpNormal 线程优先级为正常值

tpHigher 线程优先级比正常高1点

tpHighest 线程优先级比正常高2点

tpTimeCritical 线程优先级最高

TThread::ReturnValue

__property int ReturnValue = {read=FReturnValue,write=FReturnValue,nodefault};

返回线程值。

使用ReturnValue应用为其他线程指示其成功/失败或数字结果/输出。WaitFor方法返回存储在ReturnValue中的值。

TThread::Suspended

__property bool Suspended = {read=FSuspended,write=SetSuspended,nodefault};

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号