M menxin Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #2 重载form的WM_GeTMINMAXINFO消息.
M menxin Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #3 <a href=http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=152158>http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=152158</a>
<a href=http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=152158>http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=152158</a>
C cytown Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #5 http://www.gislab.ecnu.edu.cn/delphibbs/dispq.asp?LID=147862
L Liu JZX Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #6 WM_SYSCOMMAND uCmdType = wParam; xPos = LOWORD(lParam); yPos = HIWORD(lParam); uCmdType SC_MAXIMIZE (or SC_ZOOM) Maximizes the window. SC_MINIMIZE (or SC_ICON) Minimizes the window.
WM_SYSCOMMAND uCmdType = wParam; xPos = LOWORD(lParam); yPos = HIWORD(lParam); uCmdType SC_MAXIMIZE (or SC_ZOOM) Maximizes the window. SC_MINIMIZE (or SC_ICON) Minimizes the window.
3 3h Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #7 依我估计可以在OnResize中下点工夫,检查Form的状态是否最大化或最小化, 不就知道了吗?
F Fencer Unregistered / Unconfirmed GUEST, unregistred user! 1999-11-11 #8 ; 对OnResize下工夫肯定没用,要捕获窗体的最小化,最大化事件方法很多。我 私下认为最简单的方法是:(以最小化为例) 在OnCreate中声明: Application.OnMinimize:=MyMinimize; 添加MyMinimize方法如下: procedure TForm1.MyMinimize(Sender:TObject); begin // 在此添加你最小化时要处理的代码 application.Minimize; end;
; 对OnResize下工夫肯定没用,要捕获窗体的最小化,最大化事件方法很多。我 私下认为最简单的方法是:(以最小化为例) 在OnCreate中声明: Application.OnMinimize:=MyMinimize; 添加MyMinimize方法如下: procedure TForm1.MyMinimize(Sender:TObject); begin // 在此添加你最小化时要处理的代码 application.Minimize; end;