关闭 Delphi 7 个应用程序的主题

Question

我必须修复 20 年前的 Delphi 7 应用程序中的某些内容。修复后，我想我可以通过修复 GUI 主题来改进应用程序，所以我删除了主窗体上的 XPManifest 组件。虽然这使大多数控件看起来更好，但也存在一些问题。例如，蓝色背景上带有黄色文本的复选框和单选按钮 (blargh)，主题设置的黑色文本颜色使其标签不可读。所以我决定删除 XPManifest 组件并重建程序以恢复原来的外观。

有趣的是，GUI主题在删除XPManifest并重新编译exe后仍然存在。我检查了DFM， XPManifest 确实不在那里。我该如何解决这个问题？

Answer 1

该组件所做的只是向 uses 子句添加一个单元，XPMan IIRC，该单元链接一个启用主题的资源文件。从 uses 子句中删除该单元以恢复行为。

这清楚地表明了修订控制的价值。

Answer 2

当时 VCL 还不是很 theme-aware。许多 VCL 组件在启用主题时会出现错误，但在禁用时不会。将 Soft-Gems' XP Theme Manager ¹ 安装到您的项目中。它不仅可以为您启用主题，它还连接到 VCL 以修复很多错误。

^{1: Soft-Gems' 代码最终被直接合并到 VCL 中，但我不记得那是发生在 Delphi 7 还是更晚的时候。}