摘要：
program Project1;uses Forms, Windows, Unit1 in 'Unit1.pas' {Form1};Var hMutex : HWND; Ret : Integer;{$R *.res}begin Application.Initialize; Application.Title := 'test'; hMutex := CreateMutex(nil,false,'test'); Ret := GetLastError; if RetERROR_ALREADY_EXISTS then begin Applica 阅读全文
