Fenster bei mehr als einem form richtig minimieren

[DocE]

N'Abend zusammen!

OnHide löst beim Minimieren gar nicht aus (nur bei Visible := false), höchstens FormDeactivate, dies allerdings auch beim Schließen oder wie der Name schon sagt beim Deaktivieren (beides unerwünscht).

Probier mal folgendes, das geht:

Delphi-Quellcode:

  (...)

  private
    procedure MyWM_SYSCOMMAND(var aMsg: TMessage); message WM_SYSCOMMAND;

  (...)

procedure TForm2.MyWM_SYSCOMMAND(var aMsg: TMessage);
begin 

  if aMsg.WParam = SC_MINIMIZE then 
    Application.Minimize 
  else 
    inherited; 

end;

Grüsse
...Doc