Backup Hero

[FarAndBeyond]

Zitat:

Ein Mutex oder eine Semaphore ist da aber ehrlichgesagt performanter, einfacher UND zuverlässiger als deine Fenstersuche.

Na ich wette das stimmt... hab' ich halt nur noch nie benutzt.. :-)
Dafür gibt es die Beiden ja schließlich...

[dGeek]

Ich mache es schon seit Jahren so - zum Beispiel in der DPR-Datei des Projekts:

Delphi-Quellcode:

var
  hExistingInstance: THandle;
  aHandle: THandle;
  
const
 sUniqueMutexID: String = 'irgendeineuniquemutexid';
  
begin
 // Prüfen, ob das Fenster existiert. Wenn ja, kann man ja bei ".............." mit SendMessage Nachrichten an das Fenster senden o.ä.
 hExistingInstance := FindWindow('TMeinProgrammOderSo', nil);
  
 // Fenster scheint zu existieren...
 if hExistingInstance <> 0 then
  begin
   // ..............
   
   Halt(1);
  end;
  
 // Wenn das Fenster nicht existiert, nur dann einen Mutex erstellen
 aHandle := CreateMutex(nil, False, PWideChar(sUniqueMutexID));

 // Und wenn auch das schief gehen sollte.... abbrechen
 if GetLastError = ERROR_ALREADY_EXISTS then
  begin
   CloseHandle(aHandle);
   Halt(1);
  end;
end;

Man wird mich für diesen Code köpfen. Aber er funktioniert seit Jahren auf den unterschiedlichsten System vollkommen einwandfrei.

[FarAndBeyond]

Zitat:

Ich mache es schon seit Jahren so...

Muß ich auch mal ausprobieren...
Aber "FindWindow" findet doch nur Fenster, die sichtbar sind oder ???
Ist schon 'ne Weile her als ich das zum letzten Mal benutzt habe.

[dGeek]

Zitat:

Zitat von FarAndBeyond (Beitrag 1342607)

Aber "FindWindow" findet doch nur Fenster, die sichtbar sind oder ???

Ne. Es findet auch Fenster, die minimiert sind oder auch im Systembereich minimiert sind.
Das FindWindow mache ich auch nur, damit ich Kommandos ans Programm schicken kann. Würde man das FindWindow weglassen, würde notfalls CreateMutex greifen. Dort kann man ja auch reagieren.