使用Tcl / Tk注册字体（通过VBScript）

Posted 2021-05-04

我正在尝试在Windows上运行的Tcl / Tk GUI中使用自定义字体。

我真的不想在系统范围内安装字体（因为这需要管理员权限），所以我似乎需要以某种方式使用AddFontResourceEx函数，来注册字体（暂时）

现在有一些并发症：

• 需要能够使用Tcl / Tk 8.5运行
• 必须（至少）在W7到W10上运行
• 纯Tcl / Tk解决方案（没有二进制扩展;任何解决方案都必须是Tcl / Tk解释器以及原始W32安装随附的解释器自包含）
• 在部署计算机上没有管理员权限
• 没有用户互动

所以我正在考虑使用VBS脚本来做一些神奇的咒语来调用AddFontResourceEx。 （最初我使用的是Powershell脚本，但为了发现出于安全原因，默认情况下默认情况下会禁用Powershell脚本）

我不是一个Windows用户（不像VBS那个人），所以我想知道，是否甚至可以用我设想的方式用VBS注册字体。如果是这样，怎么样？或者有更简单的方法来注册Tcl / Tk（或shell）中的字体。

答案

您可以尝试使用extrafont软件包：https://wiki.tcl.tk/48903此软件包将加载外部字体，而无需在系统上安装它们。