怎么禁止鼠标点击窗体的左上角,不弹出移动,关闭,最小化那个菜单啊

如何禁止鼠标点击窗体的左上角,不弹出移动,关闭,最小化那个菜单啊!如何禁止鼠标点击窗体的左上角,不弹出移

如何禁止鼠标点击窗体的左上角,不弹出移动,关闭,最小化那个菜单啊!
如何禁止鼠标点击窗体的左上角,不弹出移动,关闭,最小化那个菜单啊!

[解决办法]
BorderIcons 只选[biSystemMenu]

procedure TfrmMain.FormCreate(Sender: TObject);
var
hmMenu:HMENU;
ms:string;
begin
hmMenu:=GetSystemMenu(Handle,False);
SetLength(ms,11);
GetMenuString(hmMenu,1,PChar(ms),10,MF_BYPOSITION);
ms:=Trim(ms);
ModifyMenu(hmMenu,1,MF_BYPOSITION or MF_GRAYED,0,PChar(ms));
 ......
end;