下面是用BCB写的最简单的一个多线程小程序
//.cpp中的线程描述 _fastcall TMyThread::TMyThread(void):TThread(true) { FreeOnTerminate=true; Resume(); }
//声明线程 void __fastcall TMyThread::Execute()//线程功能 { for(int i=1;i<4;i++) Form1->Memo1->Text=Form1->Memo1->Text+IntToStr(i)+"我得到了参数--我的线程\r\n"; } void __fastcall TForm1::Button2Click(TObject *Sender)//执行线程 { MyThread=new TMyThread(); MyThread->FreeOnTerminate=true; }
//.h中的线程类定义 //声明线程 class TMyThread:public TThread { public: __fastcall TMyThread(void); private: void __fastcall Execute(void); };
//可以在.h的窗体类定义中加入 TMyThread *MyThread;//声明一个自己的线程
这样就是一个简单的多线程程序 
|