Hallo
DP,
Ich verwende seit einer Weile folgenden Code um mehrfaches ausführen meiner Programme zu verhindern.
Delphi-Quellcode:
Initialization
mHandle := CreateMutex(nil, True, '979246B5-A7CA-7E5F-A01C-8034E778B70C');
if GetLastError = ERROR_ALREADY_EXISTS then
begin
Halt;
end;
finalization
if mHandle <> 0 then
CloseHandle(mHandle);
end.
Jetzt möchte ich eines dieser Programme als Konsolenanwendung umsetzten. Und dieses sollte auch nicht mehrfach ausführbar sein.
Wie mach ich das nun am besten o.O initialization und finalization fallen ja weg
