在Delphi XE VCL中是否支持确保只有一个应用程序的实例正在运行?
在过去,我已经使用库代码来控制一个似乎很复杂的Mutex。当我在Delphi XE开始一个新项目时,我想知道我是否需要挖掘那个旧的代码,或者是否已经在XE中内置了支持?还是有另一个容易应用的代码是好的和现代的?
解决方法
我使用JCL来做到这一点:
program MyProgram; uses JclAppInst; begin JclAppInstances.CheckSingleInstance; // Added instance checking Application.Initialize; Application.CreateForm(TMainForm,MainForm); Application.Run; end.
这个文件和通知方案是the JCL Wiki。