如何使用代码在另一个面板中水平居中面板？

Question

假设我有一个名为pnlParent的父面板和一个名为pnlChild的子面板。子面板位于父面板中，我想使用代码在子面板中水平居中子面板。

怎么能用代码完成？

Answer 1

以下是两个应该有效的代码示例：

VCL

pnlChild.Left := (pnlParent.Width - pnlChild.Width) div 2;

FMX

pnlChild.Position.Left := (pnlParent.Width - pnlChild.Width) / 2;