program OnlyOne;
uses
Forms,
Windows,
Dialogs,
UnitMain in 'UnitMain.pas' {Form1};
resourcestring
FMutex = 'MUTEX_ONLY_ONE'; //互斥对象名
{$R *.res}
var
hMutex:HWND;
iRet:Integer;
begin
2022-11-06 19:53:24
193KB
1