线程的头文件和实现文件如下: //--------------------------------------------------------------------------- #ifndef Unit2H #define Unit2H //--------------------------------------------------------------------------- #include <Classes.hpp> //--------------------------------------------------------------------------- class TWorkThread : public TThread { private: HANDLE hEvent; protected: void __fastcall Execute(); public: __fastcall TWorkThread(bool CreateSuspended); __fastcall ~TWorkThread(); }; //--------------------------------------------------------------------------- #endif //--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "Unit2.h" #include "Unit1.h" #pragma package(smart_init) //-------------------------------------------