关于窗体标题栏上按钮问题

Question

怎么样才能把窗体上标题栏的最大化按钮、最小化按钮设置为无效？
怎么样才能使窗体上标题栏的关闭按钮不能关闭窗体？
向各位大是请教！

Answer 1

窗口align属性设置为client，scaled属性设置为false
关闭按钮无效……
属性中borderIcons的BIsystemMenu:=false;

Answer 2

一,最大化按钮、最小化按钮设置为无效:  设置窗体的BorderIcons属性下面的biMinimize和biMaximize为false二,按关闭按钮不能关闭窗体,在onClose中写代码  Action:=caNone

Answer 3

楼上都说了补充阻止关闭窗体的方法：
procedure TForm2.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  CanClose := false;
end;

Answer 4

不好意思
BorderIcons属性下面的biMinimize和biMaximize为false 
bordericons.biminimize:=false;
bordericons.bimaximize:=false;
这样写是不对的？应该怎么写？
请大虾再赐教

Answer 5

属性里面自己改吧或者
Self.BorderIcons:=Self.BorderIcons-[biMaximize]-[biminimize];

Answer 6

这也是一种方法，但是bordericons的属性是这样的[bisystemmenu,biminimize,bimaximize]，不可改啊
把biminimize,bimaximize属性设置为false，用语句应该怎么写
请大虾再再指教

Answer 7

BorderIcons是一个属性集,表示下面还有子属性,D中有很多这种属性集
如Font属性,简单的语句写法如下:
-表示这个属性设为false
+表示这个属性设为TrueSelf.BorderIcons:=Self.BorderIcons-[biMaximize]-[biminimize];
等价于:
Self.BorderIcons:=Self.BorderIcons-[biMaximize,biminimize];
上面的两种写法都表示biMaximize和biminimize属性为false又例如:
Self.BorderIcons:=Self.BorderIcons-[biMaximize]+[biminimize];
这个表示了biMaximize为false,biminimize为true;

Answer 8

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin    canclose:=FAlse;
end;