本帖最后由 CodeBlue 于 2024-11-14 20:29 编辑
做一个字体安装软件
0.序言
有没有那种时候：放映ppt的时候，没有准备，里头还放着很多字体，主要是还没有做嵌入字体，而且有些字体没办法嵌入，原来“美丽的ppt字体排版”就变成了“几个瞎放的文字”。
1.解决办法
所以，我们总得想办法解决吧！
它的原理可能是这样：
从一个文件夹中安装字体文件；
打开pptx文件。
2.敲码
原理都懂了，那么就开始敲码吧！
[] 纯文本查看 复制代码 .版本 2
.支持库 eAPI
.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 字体, 文本型
.局部变量 ppt, 文本型
字体 = "字体路径"
ppt = “ppt路径”
安装字体 (字体)
运行 ( ppt, 真, )
3.运行
好像行
可是：它是一个文件夹，和几个文件对吧？
我们应该想办法变成一个单文件对吧？
所以我们把字体文件和ppt放在图片资源库里不就得了吗？（图片资源库➡️双击“内容”➡️筛选器改为“所有文件”➡️选择文件➡️加入/修改到程序并关闭对话框）
然后，代码就变成了：
[] 纯文本查看 复制代码 .版本 2
安装字体 (#字体)
写到文件（“C:\Windows\temp\filename.pptx”,#ppt）
运行（“C:\Windows\temp\filename.pptx”，真，）
PS：这段代码中的filename可以替换成自己的文件名或一串到文本的随机数
后记：
“别人都是pptx，就你一个exe！” | 
发表于 2024-10-7 15:32
发表于 2024-10-15 04:57
|
发表于 2024-10-26 10:33
