在运行时对齐按钮

时间:2011-01-06 06:19:12

标签: delphi user-interface runtime

我遇到运行时按钮对齐的问题。我希望它们在面板的中心对齐。我有TPanel,其中包含创建运行时的按钮。我希望它们能够均匀地动态填充整个面板区域。

假设我有三个按钮 - 每个按钮宽度为50px。我的面板宽度为350px。

  1. 我将面板宽度划分为行中的按钮数(Trunc(350/3)= 116)。得到按钮区域宽度。
  2. 现在我从按钮宽度中减去按钮区域宽度以获得边距(116-50 = 66)
  3. 将边距除以2以获得左右边距(Trunc(66/2)= 33)
  4. 并从左边距开始定位我的按钮,依此类推。
  5. 但这不能正常工作。我做错了什么?我的小组也有一个正确的锚。因此,如果我调整表单大小,面板会调整大小,但按钮不会对齐。

    我该如何解决这个问题?

1 个答案:

答案 0 :(得分:2)

只是一个建议,使用TGridPanel。设置列并在按钮上设置对齐客户端。它应该做同样的事情,虽然我还没有测试过。