我想要在窗体最小化时触发另一程序?怎样判断窗体最小化?

解决方案 »

  1.   

    老板,你分太少了,结贴的时候加点啊!
    拦截WM_SYSCOMMAND消息,消息中的wParam参数等于SC_MINIMIZE 表示最小化具体查看帮助
      

  2.   

    定义一个Procedure如下:
    Procedure MyMessage(var Msg: TWMSysCommand); message WM_SYSCOMMAND;
    ---------------------------------------------------------------------------
    procedure TForm1.myMessage(var Msg: TWMSysCommand);
    begin
      if Msg.CmdType = SC_MINIMIZE then
        if Application.MessageBox('最小化窗口吗?','提示',Mb_YesNo)=Id_No then
          Exit;
      inherited;
    end;
    ---------------------------------------------------------------------------
    不知道这是不是楼主要的结果.