delphi ,1）控件根据窗口大小，一直居中显示 2）显示最大化最小化按钮控件

一、控件根据窗口大小，一直居中显示

1）onResize：当窗体尺寸改变时发生

　　例子：如何使控件随窗口的放大和缩小动态改变自己的大小,使控件“保存、返回”在窗口变大变小中随着变。

　　在Panel调用

　　

procedure FROM1.CResize(Sender: TObject);
begin
  BBtn_OK.Left := round((Width - 100 - BBtn_OK.Width) / 2);
  BBtn_Exit.Left := round((Width + 100 - BBtn_Exit.Width) / 2);
end;

 

二、显示最大化最小化按钮控件

注意BorderStyle设置， 如果 是bsdialog  怎么设都没有最大和最小化！