Einzelnen Beitrag anzeigen

Benutzerbild von xZise
xZise

Registriert seit: 3. Mär 2006
Ort: Waldbronn
4.303 Beiträge
 
Delphi 2009 Professional
 
#1

[mutex] - Parameter an "alte" Anwendung geben

  Alt 3. Mär 2007, 23:58
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.
Fabian
Eigentlich hat MS Windows ab Vista den Hang zur Selbstzerstörung abgewöhnt – mkinzler
  Mit Zitat antworten Zitat