定义函数:
Function Long GetLastError() Library 'kernel32.dll'
如下判断:
string ls_AppName
IF Handle(GetApplication())>0 THEN
ls_AppName=GetApplication().AppName
CreateMutexA(0,TRUE,ls_AppName)
IF GetLastError()=183 THEN RETURN TRUE//已运行.
END IF
RETURN FALSE//未运行.
如何檢查程序已經運行
本文介绍了一种通过创建互斥量来检测应用程序是否已经运行的方法。利用GetApplication().AppName获取应用程序名称,并使用CreateMutexA函数尝试创建一个指定名称的互斥量。如果GetLastError返回错误号183,则说明该互斥量已存在,即应用程序已经在运行。

被折叠的 条评论
为什么被折叠?



