http://www.thebits.org/tutorials/mjsema.asp
指南：工作者线程和信号量
©Malcolm Smith, 14th October 2002
和我们的所有指南一样，这个指南没有义务去处理随时可能发生的任何事。请看我们的法律信息页面。本文基于一个在Windows XP Professional下测试过的项目。
目录
第1页
工作者线程和信号量
第1页
第2页
第2页
作者
Malcolm Smith(malcolm@mjfreelancing.com)-Owner of business MJ Freelancing. Check out
products available at www.mjfreelancing.com.
什么是工作者线程？
本文假定您已经具备如何在C++ Builder中创建线程的基础知识和诸如执行Execute方法，运行您的线程代码之类的基础条件。进入本文之前请阅读C++ Builder的相关文档。
您曾尝试写一个多线程应用程序，结果却发现当线程运行它们的任务时，带来了一些令人惊愕的中断吗？如果答案是“是”，那么本文就是为您准备的。
当处理集中的任务被执行时，应用程序以100%运行最常见的原因和您的“多线程”应用程序可能创建了多线程，但它们实际上不是独立运行的事实有关。这个大错误是为了运行其他线程而中断主VCL线程却在返回主线程并让第二个线程运行在它自己的空间时失败了。
为了达到本文的目的，我可以创建一个在文件和文件夹上迭代的线程。但为了使线程原理尽可能简单，我将用创建一个计算一个特定值并在窗体上更新标签的线程类来替代之。这个线程将和主VCL线程一起无障碍运行（同步更新标签的调用除外）。
class TWorkerThread : public TThread
{
private:
int CountTo;
int Counter;
TLabel *pLabel;
protected:
void __fastcall Execute(void);
void __fastcall UpdateLabel(void);
public:
__fastcall TWorkerThread(bool CreateSuspended,
TLabel *ALabel, int ACountTo);
};
上面的线程类从一个TLabel获得指针。
下面显示线程的实现，很简单。
__fastcall TWorkerThread::TWorkerThread(bool CreateSuspended,
TLabel *ALabel,int ACountTo) : TThread(CreateSuspended), pLabel(ALabel)
{
Counter = 0;
CountTo = ACountTo;
}
void __fastcall TWorkerThread::Execute(void)
{
while(!Terminated && Counter++ < CountTo)
{
Synchronize(UpdateLabel);
Sleep(100); //为了演示做的延时
}
}
void __fastcall TWorkerThread::UpdateLabel(void)
{
if(pLabel)
pLabel->Caption = IntToStr(Counter);
}
线程被执行，内部的记数器被置为0，要计算的值因而被初始化。
本文附带的演示程序有一个名“Creation of simple threads”的节。每个按纽的代码都和下面显示的类似。
TWorkerThread *Thread = new TWorkerThread(true, Label1, 50);
Thread->FreeOnTerminate = true;
Thread->Resume();
这创建一个新线程，传递一个被更新的标签和一个计数器值。当线程是resumed时，标签的caption显示增加的值。再次点击同样的按钮，您会看到标签通过多线程被更新（直到计数器达到它的目标）
这个组底部有一个另外的按纽，它模仿点击所有按纽。
好了，那是一个简单的线程，它不阻塞主VCL线程，因为每一个创建的线程都是
独立运行的。
（翻译：01soft）