写注册项防止任意程序多开

易语言 2020-03-22 16:23:04

写注册项防止任意程序多开

如果真 (信息内容 = “”)
信息内容 = “请勿重复运行程序”
句柄 = CreateMutex (安全结构, 真, 特征字串)
如果真 (WaitForSingleObject (句柄, 100) = 258)
ReleaseMutex (句柄)
CloseHandle (句柄)
如果 (窗口句柄 > 0)
ShowWindow (取数值zc项 (3, 特征字串, ), 1)
信息框 (信息内容, 0, , )
结束 ()
写zc项 (3, 特征字串, 窗口句柄)