Wie kann ich die Parameter an die alte Anwendung geben, wenn das akt. Programm par
Mutex blockiert wird?
Akt. Mutexdatei:
Delphi-Quellcode:
unit mutex;
interface
implementation
uses Windows, Dialogs;
var
mHandle: THandle;
wnd: HWND;
initialization
mHandle := CreateMutex(
Nil, True, PChar('
QuickInstallByXzise'));
if GetLastError = ERROR_ALREADY_EXISTS
then
begin
Showmessage('
Anwendung ist bereits gestartet!');
wnd := FindWindow('
TfrmQuinstall', '
QuickInstall');
if wnd <> 0
then
begin
SetForegroundWindow(wnd);
end;
Halt;
end;
finalization
if mHandle <> 0
then
CloseHandle(mHandle);
end.