Hello,
before I worked with this delphi code:
function FileInstanceCheck(var mutex : THandle):boolean;
var
mutexName : array [0..7] of char;
begin
Result:=false;
StrPCopy(mutexName ,'anyname');
mutex := openmutex ( MUTEX_ALL_ACCESS, False, mutexName ) ;
If ((mutex <> 0) ) then
begin
MessageBeep($FFFFFFFF);
//MyMsgDialog('The application is already running.');
exit;
end;
mutex := createmutex ( nil , true, mutexName);
Result:=true;
end;
function FileInstanceCheck(var mutex : THandle):boolean;
var
mutexName : array [0..7] of char;
begin
Result:=false;
StrPCopy(mutexName ,'anyname');
mutex := openmutex ( MUTEX_ALL_ACCESS, False, mutexName ) ;
If ((mutex <> 0) ) then
begin
MessageBeep($FFFFFFFF);
//MyMsgDialog('The application is already running.');
exit;
end;
mutex := createmutex ( nil , true, mutexName);
Result:=true;
end;
To copy to clipboard, switch view to plain text mode
now, I look forward to a straightforward Qt code.
regards
navid
Bookmarks