精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: CreateScalableFontResource(文本和字体)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:35:53 星期四), 转信

【以下文字转载自 cnTemp 讨论区】
【原文由 catchy 所发表】
发信人: yucheng (无话可说), 信区: VisualBasic
发信站: BBS 水木清华站 (Sat Apr 8 00:57:00 2000) WWW-POST

CreateScalableFontResource

VB声明
Declare Function CreateScalableFontResource Lib "gdi32" Alias "CreateScalableF
ontResourceA" (ByVal fHidden As Long, ByVal lpszResourceFile As String, ByVal
lpszFontFile As String, ByVal lpszCurrentPath As String) As Long
说明
为一种TureType字体创建一个资源文件，以便能用API函数AddFontResource将其加入
Windows系统。字体信息本身并不复制到字体资源文件中；相反，资源文件中包含了欲使
用的TureType文件的名字
返回值
Long，非零表示成功，零表示失败。会设置GetLastError
参数表
参数类型及说明 Long，如果是零，表示创建一个普通的字体资源；如果是1，表示创建
一个只读字体资源，它只能在文档中嵌入使用
lpszResourceFile String，欲创建的资源文件的名字。普通文件使用.FOT扩展名，只读
文件使用.FOR扩展名
lpszFontFile String，TureType字体文件文件的文件名。如果其中包含了一个路径，就
到指定的路径寻找字体文件，同时不使用lpszCurrentPath参数指定的位置。而且在调用
AddFontResource函数之前，会将字体复制到Windows的SYSTEM目录
lpszCurrentPath String，由lpszFontFile参数决定

--

--
☆ 来源:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: casi.bbs@smth.org]
--
※ 转载:．哈工大紫丁香 bbs.hit.edu.cn．[FROM: 202.118.247.254]

VB 版 (精华区)