南
南宫吹云
Unregistered / Unconfirmed
GUEST, unregistred user!
虽然可以用以下办法限制：
function CreateMutex : Boolean;
var
AppTitle : PChar;
begin
AppTitle := StrAlloc(100);
StrPCopy(AppTitle, '程序名称');
Result := True;
Mutex := Windows.CreateMutex(nil, False, AppTitle);
if (GetLastError = ERROR_ALREADY_EXISTS) or (Mutex = 0) then
begin
Result := False;
if Mutex <> 0 then
Mutex := 0;
end;
StrDispose(AppTitle);
end;
但发现只在同一个用户下有效，如果此机器登录多个用户是没办法禁止的。
多用户帐号不知道如何限制？
function CreateMutex : Boolean;
var
AppTitle : PChar;
begin
AppTitle := StrAlloc(100);
StrPCopy(AppTitle, '程序名称');
Result := True;
Mutex := Windows.CreateMutex(nil, False, AppTitle);
if (GetLastError = ERROR_ALREADY_EXISTS) or (Mutex = 0) then
begin
Result := False;
if Mutex <> 0 then
Mutex := 0;
end;
StrDispose(AppTitle);
end;
但发现只在同一个用户下有效，如果此机器登录多个用户是没办法禁止的。
多用户帐号不知道如何限制？