如何计算在Delphi中支持的最大字体尺寸？

本文共计417个文字，预计阅读时间需要2分钟。

我在尝试计算最大字体的尺寸，以便Text适合TCxLabel的ClientRect。但似乎无法让它工作。（见图）问题在于fontsize太大，而thxt没有绘制到正确的位置。这里如何重现：将tcxLabel放在窗口体上，并将标签对齐到。