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

Question

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

这如何使用代码来完成？

Answer 1

这是两个应该起作用的代码示例：

VCL

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

FMX

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