以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [讨论]发布后的软件如何禁止多次启动  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=101186)

--  作者:静听枫雨
--  发布时间:2017/5/26 13:12:00
--  [讨论]发布后的软件如何禁止多次启动
现在发布后的软件,打开登录后,还可以双击运行程序重新打开登录窗口。就像QQ一样。可以多次启动。如何禁止它呢
--  作者:天下无光
--  发布时间:2017/5/26 13:23:00
--  
在BeforeOpenProject增加代码

\'禁止多开
static mu As system.threading.mutex
Dim sucess As Boolean = False
mu=new system.threading.mutex(True,"XXXXXXXX",sucess) ‘XXXXXXXX是你的程序名称
If not sucess Then
    MessageBox.show("系统已经在运行,可退出后重新登录!","提示",MessageBoxButtons.OK,messageboxicon.Information)
    e.cancel=True
End  If

--  作者:静听枫雨
--  发布时间:2017/5/26 13:27:00
--  

谢谢!! 但出现个问题,弹出的提示框 在启动图片的下层。根本看不到提示框 !! 能不能移到上一层。

[此贴子已经被作者于2017/5/26 13:31:32编辑过]

--  作者:有点蓝
--  发布时间:2017/5/26 14:35:00
--  
参考:http://foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=85854