万一老师的《如今, Delphi 的多线程已经很易用了!》讲到了TThread.CreateAnonymousThread用法

如今我来讲在c++ builder使用 CreateAnonymousThread。

  要说明的是，c++ builder不能直接照搬Delphi的代码。由于CreateAnonymousThread使用的是Dephi 匿名函数/过程指针。

 1、方法一

  官方论坛谈到用method_cast，但我看过method_cast实现（https://forums.embarcadero.com/thread.jspa?threadID=72457），用到Boost这些东东，姑且不说能不能用，就里面的代码可不适合我等菜鸟。

TThread::CreateAnonymousThread (
method_cast (
std::tr1::bind (ThreadSafeShowMessage,
message, title, icon)

2、方法二

  我如今使用这种方法

class TSleepFunc : public TCppInterfacedObject {
public:
//这里建议用自己继承的TForm。由于后面所需參数要从Form获得
TSleepFunc(TForm3* Form) : FForm(Form) {
}

virtual void \_\_fastcall Invoke(void) {  
//这里处理你多线程代码  
//參数所有是 TForm3的变量，多线程中所需參数从TForm中声明  
    CreateXP3Archive(FForm->filename, FForm->LabelPath->Text, 1024,  
        FForm->list, true, true, true, false);  
//这里处理和TForm交互内容  
    TThread::Synchronize(TThread::CurrentThread, UpdateCaption);  
}

void \_\_fastcall UpdateCaption(void) {  
    FForm->Caption = "OK";  
}

private:
TForm3* FForm;
};

void __fastcall TForm3::ButtonClick(TObject *Sender) {
TThread::CreateAnonymousThread(new TSleepFunc(this))->Start();
}

  这里面我演示了多线程调用自己写的函数CreateXP3Archive。以及怎么把參数传入多线程函数中，当中TForm3是我自己firemonkey 窗口。

  另外CreateAnonymousThread是XE版本号以后才提供的函数，相似BCB6这些是没有这个函数的。