SetForegroundWindow vs. CoolTrayIcon.ShowMainForm

[TonyR]

Falls das hier jmd. interessiert, die Lösung:

Delphi-Quellcode:

   repeat
      appH := FindWindow(PChar('TMform'), nil);
   until appH <> Application.Handle;

    if appH <> 0 then
    begin
       ParentH := GetWindowLong(appH, GWL_HWNDPARENT);
       Windows.ShowWindow(appH, SW_Normal);
       postmessage(ParentH,WM_SYSCOMMAND,SC_RESTORE,0);
       Windows.SetForegroundWindow(appH);
    end;

Im OnRestore Ereignis der Anwendung (ApplicationEvents benutzen!) kann man dann festlegen, dass das TrayIcon verschwindet.