赞 | 5 |
VIP | 359 |
好人卡 | 195 |
积分 | 3 |
经验 | 560179 |
最后登录 | 2024-5-17 |
在线时间 | 1373 小时 |
Lv2.观梦者
- 梦石
- 0
- 星屑
- 275
- 在线时间
- 1373 小时
- 注册时间
- 2005-10-16
- 帖子
- 5113
|
加入我们,或者,欢迎回来。
您需要 登录 才可以下载或查看,没有帐号?注册会员
x
印象里貌似有个文件复制的方法来着,想不起来了,随便拎个API来了事...dir = Win32API.new('kernel32','GetSystemDirectory','p,l','l')
dir_str = " " * 256
dir.call(dir_str,255)
dir_str = dir_str.split('system')[0]
font_name = "fzcqjw.ttf"
font_chn_name = "方正粗倩简体"
if FileTest.exist?(font_name)
copy = Win32API.new('kernel32',"CopyFileA",'p,p,l','')
copy.call(font_name, "#{dir_str}Fonts/#{font_name}",0)
font = Win32API.new('gdi32','AddFontResourceA','p','l')
sendmsg = Win32API.new('user32','SendMessageA','l,l,l,l','l')
unless Font.exist?(font_chn_name)
font.call(font_name)
sendmsg.call(65535,29,0,0)
retry
end
end
注意彩色的两处地方,一处是字体的文件名,另一处是字体名,要对号入座!
另外要添加路径时在这里加上即可。
把这个插入到脚本 Main 之前,记得 Main 脚本里对 Font.default_name 做相应的修改,否则可是看不出效果的!
使用此脚本之后会自动将指定字体复制到系统的 Fonts 目录中,同时更改字体列表,无需再像之前那个版本一样重启游戏~~~
发现重大BUG,一运行会引发一个bug,测试时由于字体太多而未发现。。。 |
|