私人资料库 https://bbs.21ic.com/?29396 [收藏] [复制] [RSS]

日志

在BCB下如何让程序只运行一次

已有 680 次阅读2009-10-22 03:47 |个人分类:C语言|系统分类:嵌入式系统

看到别人是这样写的,小试一下,很好用


#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Main.cpp", MainForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
   HANDLE hMutex = CreateMutex( 0, false, Application->Title.c_str() );
   if ( hMutex )
   {
      if ( GetLastError() == ERROR_ALREADY_EXISTS )
      {
         CloseHandle(hMutex);
         Application->Terminate();
      }
   }
   try
   {
       Application->Initialize();
       Application->CreateForm(__classid(TMainForm), &MainForm);
       Application->Run();
   }
   catch (Exception &exception)
   {
       Application->ShowException(&exception);
   }
   catch (...)
   {
       try
       {
          throw Exception("");
       }
       catch (Exception &exception)
       {
          Application->ShowException(&exception);
       }
   }
   CloseHandle(hMutex);
   return 0;
}


 


路过

鸡蛋

鲜花

握手

雷人

评论 (0 个评论)