A antic_ant Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-07 #2 处理最小化的消息,具体的消息查一查帮助,实在记不清了
风 风云再起 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-07 #4 假设你的窗体是最大化了: private procedure WMSyscommand(var Msg:TWMSyscommand);message WM_SYSCOMMAND; ... begin if (msg.cmdtype=SC_MINIMIZE) or (msg.cmdtype=SC_RESTORE) then Msg.Result:=0 else Inherited; end;
假设你的窗体是最大化了: private procedure WMSyscommand(var Msg:TWMSyscommand);message WM_SYSCOMMAND; ... begin if (msg.cmdtype=SC_MINIMIZE) or (msg.cmdtype=SC_RESTORE) then Msg.Result:=0 else Inherited; end;