如何使form窗体的最大化按钮为灰色？

[langzi84]

很菜的问题，但偶不会、、

[nzh517]

看看窗体和属性,好象里面有设置,

[liangzisiyun]

设置Form的BorderIcons为[biSystemMenu,biMinimize]，即把biMaximize设为False。

[langzi84]

晕！，这么简单，偶真菜，

[vinsen790615]

Form的BorderIcons,里有设置！

[Shiyl]

揭贴

[cow8063]

呵.........

[duxin]

曾分

[lw549]

function GrayedCloseItem( h : HWND ) : Boolean;
//实现使窗口的关闭变灰(h: 窗口的句柄)
var
hM: HMENU;
begin
if h <> 0 then //有效句柄
begin
hM := GetSystemMenu(h, False);
Result := EnableMenuItem(hM,SC_CLOSE,MF_BYCOMMAND+MF_DISABLED+MF_GRAYED);
end
else
Result := False;
end;

[lw549]

function EnableCloseItem( h : HWND ) : Boolean;
//实现使窗口的关闭有效(h: 窗口的句柄)
var
hM: HMENU;
begin
if h <> 0 then //有效句柄
begin
hM := GetSystemMenu(h, False);
Result := EnableMenuItem(hM,SC_CLOSE,MF_BYCOMMAND+MF_ENABLED);
end
else
Result := False;
end;

[lw549]

错了，我的是关闭按钮的，呵呵。
Sorry

楼主修改一下吧。SC_CLOSE->SC_MAXIMIZE

[2312]

~Q~