多线程学习这句Form1->Begin Consumer->Set Event ();应该如何写?
void __fastcall TreadP::Execute()
{
NameThreadForDebugging(System::String(L"ThreadPTN"));
//---- Place thread code here ----
int i = 0;
int j;
while(i<100) //每个生产者线程生产100个商品
{
Sleep(1000);//延迟,为清楚得显示执行效果
if(Form1->buffer_size > 0)//缓冲池不空,通知消费者消费
{
Form1->B Begin Consumer->Set Event (); //这句应该是伪代码吧?
}
Form1->Produce Guard->Acquire ();
i++;
StrResult = IntToStr (i);
J = Form1->buffer_size;
Form1->Product [j] = i;
Form1->buffer_size++;
Synchronize(Show Result);//刷新界面,显示最新生产-消费状况
Form1->Begin Consumer->Set Event();//通知消费者消费
if(Form1->buffer_size == 5)//缓冲池满,挂起生产者线程,直到通知再生产
{
Form1->Begin Produce->Wait For (INFINITE);
}
Sleep (1000);
Form1->Produce Guard->Release ();
}
While (Form1->buffer_size > 0)
{
Form1->Begin Consumer->Set Event ();
}
}