不是主窗口最小化在左下角的解决方法

自定义 这么一个过程就可以了： 在 private     { Private declarations }    procedure   WMSysCommand(var Msg: TWMSysCommand); message WM_SYSCOMMAND; 
 public 这两个下面哪个里面定义都可以。 
procedure   TForm1.WMSysCommand;
 begin 
  if Msg.CmdType   =   SC_MINIMIZE  then    
     Form1.Hide;  //本人的加上application.mini...
 DefaultHandler(Msg); 
end;