怎样使最大化，最小化按钮显灰色

Question

form有属性设置！
BorderIcons里面的设为true就可以了！

Answer 1

灌水啦
form.BorderIcons里
biMinimize := false;
biMaximize := False;

Answer 2

form.BorderIcons里
biMinimize := false;
biMaximize := False;

Answer 3

form.BorderIcons里面
biMinimize := false;
biMaximize := False

Answer 4

完全同意。但要注意BorderStyle属性的设置，如果为bsDialog 或者 bsNone 那可就没有最大化和最小化按钮了！

Answer 5

form1.BorderIcons:=form1.BorderIcons-[biMinimize,biMaximize];

Answer 6

property BorderStyle: TFormBorderStyle;Value          MeaningbsDialog          Not resizeable; standard dialog box border
bsSingle          Not resizeable; single-line border
bsNone          Not resizeable; no visible border line
bsSizeable Standard resizeable border
bsToolWindow like bsSingle but with a smaller caption
bsSizeToolWin like bsSizeable with a smaller caption
property BorderIcons:TBorderIcons;Value          MeaningbiSystemMenu ……
biMinimize The form has a Minimize button
biMaximize The form has a Maximize button
biHelp          ……

Answer 7

api fuction
getsystemmenu
getsubmenu
removemenu

Answer 8

var
  wl: LongInt;
begin
  wl := GetWindowLong(self.HANDLE, GWL_STYLE);
  SetWindowLong(self.HANDLE, GWL_STYLE,
    wl and not WS_MINIMIZEBOX) ; //WS_MAXIMIZEBOX
end;
--The end;

Answer 9

api fuction
getsystemmenu
getsubmenu
removemenu具体怎样使用

Answer 10

BorderIcons里面的设为true就可以了

Answer 11

到窗体的bordericons的属性中去找！