Dynamisches FindWindow(ex)

[uoeb7gp]

Hallo, um Systemweit ein Flag zu setzen kann man Semaphoren, Mutexe, Atoms usw. verwenden.

Delphi-Quellcode:

var
  hTargetSem : THandle;
begin
  try
    hTargetSem := CreateSemaphore(NIL, 0, 1, PChar('[{15259A27-97B5-49D6-A70A-E9281C045775}]'));
    if(GetLastError = ERROR_ALREADY_EXISTS) or (hTargetSem = 0) then begin
       if hTargetSem > 0 then CloseHandle(hTargetSem);
       EXIT;
    end;
end;

lg.