怎样去掉窗体右上角的关闭按钮，保留最小化和最大化按钮

Question

各位老师好：
    怎样去掉窗体右上角的关闭按钮，保留最小化和最大化按钮 。我是个Delphi菜鸟，请多指点。

Answer 1

procedure TForm1.FormCreate(Sender: TObject);
begin
  EnableMenuItem(GetSystemMenu(Handle, False), SC_CLOSE,
    MF_BYCOMMAND or MF_DISABLED or MF_GRAYED);
end;

Answer 2

是不是可以设置窗体的borderstyle为bsNone

Answer 3

bordericons属性设置为[biMinimize,biMaximize]