delphi - 通过 installaware 安装我的应用程序后，我必须打开 windows 字体文件夹

Question

我已经通过 installaware 为我的应用程序构建了一个安装程序。我在安装过程中自动将一些字体复制到 windows 字体文件夹。当我打开已安装的应用程序时，字体无法正确显示，直到我打开和关闭 windows 字体文件夹或重新启动计算机。有什么解决方案可以让我不需要打开字体文件夹或重新启动计算机？比如刷新windows新安装的字体。

我很感激任何建议。

Answer 1

MSDN 中描述了所需的过程。总结一下：

• 将字体复制到 %windir%\fonts 文件夹。
• 呼叫AddFontResource或AddFontResourceEx。
• 将消息广播WM_FONTCHANGE到所有顶级窗口。

找到一种方法来说服您的安装工具为您完成这项工作可能会更容易。