delphi_只允许运行一个exe实例

时间:2014-04-12 08:59:41
【文件属性】:

文件名称:delphi_只允许运行一个exe实例

文件大小:193KB

文件格式:RAR

更新时间:2014-04-12 08:59:41

delphi 一个exe实例

program OnlyOne; uses Forms, Windows, Dialogs, UnitMain in 'UnitMain.pas' {Form1}; resourcestring FMutex = 'MUTEX_ONLY_ONE'; //互斥对象名 {$R *.res} var hMutex:HWND; iRet:Integer; begin


【文件预览】:
只能开启一个程序
----__history()
--------OnlyOne.dpr.~6~(509B)
--------UnitMain.dfm.~1~(329B)
--------OnlyOne.dpr.~9~(568B)
--------OnlyOne.dpr.~5~(505B)
--------OnlyOne.dpr.~4~(429B)
--------UnitMain.dfm.~2~(354B)
--------OnlyOne.dpr.~1~(235B)
--------UnitMain.pas.~1~(313B)
--------OnlyOne.dpr.~7~(530B)
--------UnitMain.pas.~2~(588B)
--------OnlyOne.dpr.~3~(342B)
--------OnlyOne.dpr.~8~(530B)
--------OnlyOne.dpr.~2~(294B)
----OnlyOne.identcache(249B)
----OnlyOne.res(5KB)
----UnitMain.pas(313B)
----UnitMain.dcu(3KB)
----OnlyOne.dproj.local(2KB)
----OnlyOne.exe(428KB)
----UnitMain.dfm(329B)
----OnlyOne.dproj(4KB)
----OnlyOne.dpr(604B)

网友评论

  • 大多数情况下可用,不过还是有部分弊端
  • 这个可以用,自己再加上一些修改,完美运行中。
  • 大多数情况下可用,不过还是有部分弊端!
  • 通常情况下这种方法可行,谢了!