张 张利中 Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-29 #1 在delphi的界面窗口中,怎样使窗口标题栏右上方的中间按钮(即最大化/还原)失效,即 当用户单击时,它不响应操作. 或者怎样让它消失?
R Reboot Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-29 #2 Form1.BoarderIcons :=[biSystemMenu,biMinimize]; OK?
B BaKuBaKu Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-29 #3 type TForm1 = class(TForm) private { Private declarations } procedure WMNCHITTEST(var Msg: TMessage); message WM_NCHITTEST; public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM} { TForm1 } procedure TForm1.WMNCHITTEST(var Msg: TMessage); begin Inherited; if Msg.Result = HTZOOM then Msg.Result := HTNOWHERE; end; end.
type TForm1 = class(TForm) private { Private declarations } procedure WMNCHITTEST(var Msg: TMessage); message WM_NCHITTEST; public { Public declarations } end; var Form1: TForm1; implementation {$R *.DFM} { TForm1 } procedure TForm1.WMNCHITTEST(var Msg: TMessage); begin Inherited; if Msg.Result = HTZOOM then Msg.Result := HTNOWHERE; end; end.
G gcq Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-29 #4 只要Form1.BoarderIcons :=[biSystemMenu,biMinimize];就可以了! 或者在属性框里设置!
Y YNTW Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-29 #5 同意,如果不需要在执行过程中判断的话,最简单的就是设置属性了。
M mat Unregistered / Unconfirmed GUEST, unregistred user! 2000-11-30 #6 按F11键出现属性窗体找到FORM的属性,在BOARDERSTYE栏点前面的+号,出现子项目,使MAX那 一项成FALSE.