MainForm minimieren aber nicht zweites Form

[d7user1]

"oder die Message abfangen..."

genau so habe ich es jetzt gemacht und es funktioniert auch. ich habe vorher die WMSysCommands abgefragt aber das funktionierte in diesem fall nicht.

korrekt ist

Delphi-Quellcode:

procedure WMShowWindow(var Msg: TWMSHOWWINDOW);
 begin
  if not Msg.Show then
   Msg.Result := 0
 else
  inherited;
end;