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

[解决办法]
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;