如何在Delphi 7应用程序中支持自定义桌面DPI设置？

Question

我们有一些使用Delphi 7编写的遗留应用程序。多年来，我们一直有几个要求来支持这些应用程序中的自定义桌面dpi设置，但是我们已经能够避开子弹直到知道。那么我们不能再做了。

当用户将他们的桌面设置为120dpi时，某些控件“脱落”应用程序或延伸到可见范围之外的形式，特别是锚定在其父项右侧的那些形式。

我可以做什么来防止这个问题没有心脏直视手术。

Answer 1

如您所知，这是一个well known issue with Delphi forms and interactions with system font sizes。

Delphi窗体的默认行为是尝试缩放以尊重（运行时）用户的桌面环境。正如你发现的那样，这可能会产生意想不到的副作用。

但是Scaled属性（默认为TRUE）可以设置为FALSE以防止出现这种情况，但我建议您阅读第一篇文章，并考虑the information in this article以确定这是否适合您的情况。如果你很幸运，只需在所有表单上设置缩小到FALSE，即使不是全部（这可能是单调乏味的，但并不完全是心内直视手术），也可能为你提供一个很好的途径。