实现程序互斥运行的几种方法

在WIN32下，实现程序互斥运行的方法有很多种，我简单分析以下几种不同的实现：

在VC下的实现

Visual C++ 是WIN32编程最主要也是最强大的编程工具这一，引用一名话来说VC就是“只有你想不到的，没有VC做不到的”。废话少说，下面看看用VC是如何这个功能。

使用编译器来实现（使用MFC框架）

在.cpp文件开头加上以下几行：

#pragma data_seg("Shared")     

int volatile g_lAppInstance =0;

#pragma data_seg()

我们来看一下上面的内容：

• 第一句 #pragma data_seg("Shared") 创建一个称为Shared 的新节。
• 第二句 int volatile g_lAppInstance =0 将 g_lAppInstance 放入Shared节中。注意此时只有将g_lAppInstance初始化，编译器才会将其放入Shared节中，否则，将放入Shared以外的 节。（实际上Visual C++ 编译器提供了一个allocate 说明符，使我们可以将数据放到任何节中。）
• 第三句指示编译器Shared 节结束。

#pragma comment(linker,"/section:Shared,RWS")

这一句，我们使编译链接器知道我们的Shared节具有读，写，共享的属性。这是我们实现互斥运行的关键。这样我们就可以在应用程序之间的多个实例之间共享g_lAppInstance 变量。在InitInstance() 函数中加入：

if(++g_lAppInstance>1)

{

	AfxMessageBox("程序已经运行!");

	return FALSE;

}

以上代码的作用是在程序是开始对g_lAppInstancd 加1 ，如果发现其值大于1，那么显示Message Box ,并返回FALSE。（注意：在MFC中如果InitInstance返回FALSE，程序将不会被运行！）

使用命名互斥对象

使用API函数CreateMutex来创建命名互斥对象来实现程序互斥是一个比较通用的方法，我们可以在IninInstance()函数加入如下代码:

HANDLE hObject = CreateMutex(NULL,FALSE,"LJPXYXC");

if(GetLastError() == ERROR_ALREADY_EXISTS)

{

	CloseHandle(hObject);

	AfxMessageBox("程序已经运行!");

	return FALSE;

}

以上的CreateMutext函数创建一个称为“LJPXYXC”的命名的互斥对象，当程序的第二个实例运例时，调用CreateMutex 返回ERROR_ALREADY_EXISTS。我们根据这个值来实现程序的互斥运行。

VB的实现

在VB实现的程序中，全局对象App.PreInstance可以实现这个功能。App.PreInstance 是一个boolean型的值。如果其值为True说明程序已有一个实例在运行，如果为False那么，程序可以运行。

我们可以在对窗体载入事件编程，来实现这个功能,代码如下:

Private sub Form1_load()

	If App.PreInstance  =  True then

		MsgBox “程序已经运行！”

		Unload me

	End if

End sub

Delphi,C++Builder的实现

我没有发现Delphi 和C++Builder 的编译器有实现像VC一样的功能。所以我们可以调用CreateMutex来实现这个功能。CreateMutext(),GetLastError()这两个函数的详细信息可以参考MSDN.