最佳答案:
AddFontResource是指定的文件里增加字体资源到系统字体表。
详情介绍
AddFontResource是指定的文件里增加字体资源到系统字体表。
- 中文名
- AddFontResource
- 原型
- int AddFontResource
- 参数
- lpszFilename
AddFontResource函数功能
该函数从指定的文件里增加字体资源到系统字体表,这些字体可随后被任何基于Win32的应用程序用来作正文输出。
AddFontResource函数原型
int AddFontResource(LPCTSTR lpszFilename);
AddFontResource参数
lpszFilename:指向含有一个有效的字体文件的文件名,它是以0结束的字符串的指针,此文件名可以指定一个.FON字体资源文件、一个.FNT未加工位图字体文件、一个.TTF未加工TrueType文件或一个.FON TrueType资源文件。
AddFontResource返回值
如果函数调用成功,则返回值为增加的字体数;如果函数调用失败,返回值是0。
AddFontResourceWindows NT
若想获得更多错误信息,请调用GetLastError函数。
AddFontResource其他信息
任何增加或删除系统字体表中字体的应用程序都必须以发WM_FONTCHANGE消息给操作系统中所有最顶层的窗口来通过其他窗口字体的改变,应用程序调用SendMessage和设置参数hwnd为HWND_BROADCAST来发送消息。
当一个应用程序不再需要一种由调用AddFontResource加载进来的字体资源,应该用RemoveFontResource来删除这种资源。
AddFontResourceWindows CE
版本1.0仅支持光栅字体。Windows CE 2.0版本支持使用TrueType字体或光栅字体其中之一的系统,字体类型(光栅或TrueType)在系统设计时就已确定,不能被一个应用程序修改。
AddFontResource速查
Windows NT:3.1及以上版本;Windows:95及以上版本;Windows CE:1.0及以上版本;头文件:wingdi.h;库文件:gdi32.lib;Unicode:在Windows NT环境下以Unicode和ANSI两种方式实现。
AddFontResource示例
VB中的示例
Private Declare Function AddFontResource Lib "gdi32" Alias "AddFontResourceA" (ByVal lpFileName As String) As Long
Private Declare Function RemoveFontResource Lib "gdi32" Alias "RemoveFontResourceA" (ByVal lpFileName As String) As Long
Dim AppPath As String
Private Sub Form_Load()
'The KPD-Team 2001
AppPath = App.Path
If Right$(AppPath, 1) <> "" Then AppPath = AppPath + ""
'Add the font to the Windows Font Table
AddFontResource AppPath + "myfont.ttf"
'Write something on the form
Me.AutoRedraw = True
Me.FontName = "myfont"
Me.Print "This is a test!"
End Sub
Private Sub Form_Unload(Cancel As Integer)
'Remove the font from the Windows Font Table
RemoveFontResource AppPath + "myfont.ttf"
End Sub
免责声明:本平台仅供信息发布交流之途,请谨慎判断信息真伪。如遇虚假诈骗信息,请立即举报
举报