请问怎么样判断窗体是否为最小化

解决方案 »

  1.   

    IsIcon(Handle);
    IsIcon(Application.Handle);
      

  2.   

    type
      TForm1 = class(TForm)
      private
         procedure WMSysCommand(var Message: TMessage); message WM_SYSCOMMAND;
      //...
      end;implementation{$R *.DFM}
    procedure TForm1.WMSysCommand(var Message:TMessage);
    begin
      if Message.WParam = SC_ICON then  //最小化了
      begin
      //form1.hide; ...
      end
      else
        inherited;
    end;
      

  3.   

    if Form1.WindowState=wsMinimized then