陈 陈锡震 Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-20 #1 点击窗体上的最大/最小化按钮会触发什么事件, 此时窗体的状态是什么(好象不是max和min)!
S SuperMMX Unregistered / Unconfirmed GUEST, unregistred user! 2000-07-20 #2 WM_SYSCOMMAND, 状态应该是原来的状态, 因为还没有发生.
X xlf Unregistered / Unconfirmed GUEST, unregistred user! 2000-10-08 #6 private procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND; end; procedure TForm1.WMSysCommand(var Message: TWMSysCommand); begin case Message.CmdType of SC_Maxmized: //最大化//; SC_Minimized://最小化事件; SC_Closed://关闭事件 end; end;
private procedure WMSysCommand(var Message: TWMSysCommand); message WM_SYSCOMMAND; end; procedure TForm1.WMSysCommand(var Message: TWMSysCommand); begin case Message.CmdType of SC_Maxmized: //最大化//; SC_Minimized://最小化事件; SC_Closed://关闭事件 end; end;