delphi - 在 TSpeedButton 中将字形居中

Question

我正在构建一个使用 TSpeedButton 的应用程序（D5），并且在运行时加载字形。

一切都很好，但是定位选项，顶部、左侧、右侧和底部非常笨拙，因为 40 x 40 按钮上的 32 x 32 字形始终位于左上方、右上方或下方。

我怎样才能使字形垂直和水平居中，以便

Glyph.Top = 4;
Glyph.Left = 4;

并且 32 x 32 图片位于按钮的中心。

谢谢你。

Answer 1

将 Layout 设置为 blGlyphLeft 并将 Margin 设置为 -1。这应该使按钮内的字形居中。