//--------------------------------------------------------------------------- #include #pragma hdrstop #include "VerifyThreadUnit.h" #include "VerifyFormUnit.h" #pragma package(smart_init) //--------------------------------------------------------------------------- // Important: Methods and properties of objects in VCL can only be // used in a method called using Synchronize, for example: // // Synchronize(&UpdateCaption); // // where UpdateCaption could look like: // // void __fastcall TProgressThread::UpdateCaption() // { // Form1->Caption = "Updated in a thread"; // } //--------------------------------------------------------------------------- __fastcall TVerifyThread::TVerifyThread(bool CreateSuspended, TForm* pForm) : TThread(CreateSuspended) { m_pForm = pForm; } //--------------------------------------------------------------------------- void __fastcall TVerifyThread::Execute() { //---- Place thread code here ---- ((TVerifyForm*)m_pForm)->Operation(); } //---------------------------------------------------------------------------