TestThreadUnit.cpp 1.05 KiB
//---------------------------------------------------------------------------
#include <stdio.h> /* printf */
#include <vcl.h>
#pragma hdrstop
#include "TestThreadUnit.h"
#pragma package(smart_init)
//---------------------------------------------------------------------------
__fastcall TTestThread::TTestThread(bool CreateSuspended)
: TThread(CreateSuspended)
{
ChildEvent = new TSimpleEvent();
ParentEvent = new TSimpleEvent();
}
//---------------------------------------------------------------------------
__fastcall TTestThread::~TTestThread()
{
delete ChildEvent;
delete ParentEvent;
}
//---------------------------------------------------------------------------
void __fastcall TTestThread::Execute()
{
printf("TestThread::Execute() entry\n");
ChildEvent->SetEvent();
for(int i=0;i<10;i++) {
ParentEvent->WaitFor(10000);
ParentEvent->ResetEvent();
printf(" <child>\n");
ChildEvent->SetEvent();
}
printf("thread_test exit\n");
ChildEvent->SetEvent();
}
//---------------------------------------------------------------------------