C++Builder 程序只运行一个实例

该函数能设置程序只运行一个实例；  参数title是程序实例的名称。

bool RunOnlyOnce(AnsiString title)

{

        Application->Title=title.c_str();

        CreateMutex(NULL,False,title.c_str());

        if(GetLastError()==ERROR_ALREADY_EXISTS)

        {

                ShowMessage("该程序已经运行!");

                return false;

        }

        return true;

}