"Calc.exe" starten oder wenn bereits aktiv: SW_Restore schicken

[teebee]

Zitat von DeddyH:

Auf einem deutschen Windows, ja.

Geht auch nur mit der Klasse ohne Titel.

[DeddyH]

Das weiß ich auch. Nur denke ich mir, dass es zuverlässiger wäre, das Fenster über den Pfad zu ermitteln, es wird ja wohl kaum einer die calc.exe im System32-Ordner überschrieben haben. Problematisch wird das nur, wenn man sie in ein anderes Verzeichnis kopiert und daraus gestartet hat (aber wer macht denn sowas?).

[teebee]

Zitat von DeddyH:

Das weiß ich auch.

Hab ich auch nicht angezweifelt

Letzten Endes wird man immer ein Szenario konstruieren können, und sei es noch so unwahrscheinlich, in dem die aufwändigste Lösung nicht funktioniert.

Gruß, teebee

[DeddyH]

Das ist leider so, man kann die möglichen Fehlerquellen allenfalls minimieren, aber nicht ausschließen.

[Uwe Raabe]

Also ich löse exakt dieses Problem mit Hilfe von madExcept, genauer gesagt mit madKernel:

Delphi-Quellcode:

const
  SSciCalc = 'SciCalc';
  SCalcExe = 'calc.exe';
var
  prc: IProcess;
  win: IWindow;
  I: Integer;
begin
  prc := Process(SCalcExe);
  if not prc.IsValid then begin
    prc := NewProcess(SCalcExe);
    prc.WaitForInputIdle();
  end
  else begin
    prc.TaskbarWindows.Restore();
    prc.Restore();
    for I := 0 to prc.Windows_.ItemCount - 1 do begin
      win := prc.Windows_.Items[I];
      if SameText(win.ClassName, SSciCalc) then begin
        win.BringToTop();
        win.BringToForeground();
        Break;
      end;
    end;
  end;
end;