如何设计delphi 窗体里面的组件居中
展开全部
在窗体上放一个 TPanel ;
Panel1 的 Align 属性设为 alClient ;
需要自动居中的组件都放在 Panel1 上 ;
在 Panel1 的 Resize 事件写以下代码:
Button1.Left := round((Width - 8 - Button1.Width) / 2); //常量8用于处理边界问题
Button1.Top := round((Height - 8 - Button1.Height) / 2);
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控件。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询