CreateScalableFontResource

CreateScalableFontResource

VB声明

Declare Function CreateScalableFontResource Lib "gdi32" Alias "CreateScalableFontResourceA" (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

参数表

参数

类型及说明

fHidden

Long，如果是零，表示创建一个普通的字体资源；如果是1，表示创建一个只读字体资源，它只能在文档中嵌入使用

lpszResourceFile

String，欲创建的资源文件的名字。普通文件使用.FOT扩展名，只读文件使用.FOR扩展名

lpszFontFile

String，TureType字体文件文件的文件名。如果其中包含了一个路径，就到指定的路径寻找字体文件，同时不使用lpszCurrentPath参数指定的位置。而且在调用AddFontResource函数之前，会将字体复制到Windows的SYSTEM目录

lpszCurrentPath

String，由lpszFontFile参数决定

Top