在BCB中使用多线程实例.doc

在BCB中使用多线程实例 2013-07-26 | 分类: 编程总结 | 标签：bcb 线程 | 浏览(1000) 多线程编程是提高系统资源利用率的一种常见方式。它占用的资源更小，启动更快，还可以实现在后台运行一些需时较长的操作。[喝小酒的网摘]/a/8498.htm 一、初识TThread对象 VCL提供了用于多线程编程的TThread类，在这个类中封装了Windows关于线程机制的Windows API，通常将它的实例成为线程对象。线程对象通过封装简化了多线程应用程序的编写。注意，线程对象不允许控制线程堆栈的大小或安全属性。若需要控制这 些，必须使用Windows API的CreateThread()或BeginThread()函数。不过，即使是使用Windows Thread API函数建立和控制多线程，仍然可从一些同步线程对象或下节将要描述的方法中受益。 要在应用程序中使用线程对象，必须创建TThread的一个派生类。File|New|Thread Object，系统会提示为新线程对象提供类名，我们将其命名为TMyThread。我们必须自行在构造函数以及Execute()函数中添加代码。自动 生成的构造函数中有一个参数，如果为true的话线程创建后将进入挂起状态，直到线程对象的Resume()函数被调用才开始执行。如果为false则线 程创建后会立刻开始执行。 我们先创建一个实例来亲自感受下多线程：在窗体上放两个Button和两个Edit组件，自动命名。然后File|New|Thread Object来创建一个线程对象，命名为TMyThread。 以下请看完整工程代码： //Unit1.h //主窗体头文件 //--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include Classes.hpp #include Controls.hpp #include StdCtrls.hpp #include Forms.hpp #include Unit2.h //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TButton *Button1; TButton *Button2; TEdit *Edit1; TEdit *Edit2; void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall FormCreate(TObject *Sender); private: // User declarations TMyThread *thread1,*thread2; public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif //Unit1.cpp //主窗体实现文件 //--------------------------------------------------------------------------- #include vcl.h #pragma hdrstop #include Unit1.h //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource *.dfm TForm1 *Form1;