在窗体上放一个 TPanel ；
Panel1 的 Align 属性设为 alClient ；
需要自动居中的组件都放在 Panel1 上 ；
在 Panel1 的 Resize 事件写以下代码：
Button1.Left := round((Width - 8 - Button1.Width) / 2); //常量8用于处理边界问题
Button1.Top := round((Height - 8 - Button1.Height) / 2);
将控件放好后,设置Anchors属性.就可以了
可使用EasySize控件。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024