如何使程序只运行一个实例

       我们在开发程序时，经常需要程序只运行一个实例，以避免不同的进程同时控制同一个硬件，或读写相同的端口，造成系统的不稳定或崩溃。本文给出一种实现的方法。

一。实现原理：

在指定窗口的属性表中增加一个新项的字符串，然后在程序初始化时，遍历所有正在运行程序的窗口，查找窗口的属性表中，是否有我们加入的字符串。如果有，则说明此程序已经有一个实例正在运行，则显示前一个例程，并退出当前正启动的例程。它主要用到三个函数。

SetProp：向指定窗口的属性表中增加一个新项的字符串。

GetProp：从给定窗口的属性列表中检索数据句柄。

EnumWindows：枚举所有屏幕上的顶层窗口

二。编程实现：

首先：用VC6.0生成一个基于单文档的程序。

在App类的cpp文件中添加两个全局变量：

CString  g_szPropName = "MyTestSystem";   //自己定义一个属性名

HANDLE   g_hValue = (HANDLE)1;               //自己定义一个属性值

然后：在CMainFrame类的OnCreate函数中添加如下代码

SetProp(m_hWnd,"MyTestSystem",(HANDLE)1);

 这样窗口的属性表中的字符串变量就添加完成。

最后我们要实现在启动程序时对字符串的检索。

在App类中添加一个全局的回调函数。实现对指定字符串的检索。

BOOL CALLBACK EnumWndProc(HWND hwnd,LPARAM lParam)

{  

        HANDLE h = GetProp(hwnd,g_szPropName);  

       if( h == g_hValue)  

       {   

             *(HWND*)lParam = hwnd;   

            return false;  

       }  

      return true;

}

在App类的InitInstance()函数的开始处添加如下代码

HWND oldHWnd = NULL;   

EnumWindows(EnumWndProc,(LPARAM)&oldHWnd);    //枚举所有运行的窗口  

if(oldHWnd != NULL)  

{   

       AfxMessageBox("本程序已经在运行了");  

       ::ShowWindow(oldHWnd,SW_MAXIMIZE);          //激活找到的前一个程序   

       ::SetForegroundWindow(oldHWnd);             //把它设为前景窗口   

       return false;                               //退出本次运行  

}

编译执行，测试通过。本程序在winxp，VC6.0下调试通过。