让程序只能运行一个实例(来自ccrun)

就是受不了csdn的速度!

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
    try
    {
         HANDLE hMutex=CreateMutex(NULL,true,"XXJCW_CCGL_run_flag");//建立互斥信号量
                 if(GetLastError()==ERROR_ALREADY_EXISTS)     //此互斥量已经存在
                 {
                   ShowMessage("出仓管理系统 已经在运行中!");
                   ReleaseMutex(hMutex);    //释放互斥量
                   return 0;     //退出
                 }
         Application->Initialize();