EnumFontFamilies

VB声明
Declare Function EnumFontFamilies Lib "gdi32" Alias "EnumFontFamiliesA" (ByVal hdc As Long, ByVal lpszFamily As String, ByVal lpEnumFontFamProc As Long, ByVal lParam As Long) As Long
说明
列举指定设备可用的字体
返回值
Long，由回调函数返回的前一个值
参数表
参数 | 类型及说明
hdc | Long，设备场景的句柄
lpszFamily | String，欲枚举的字体家族。如指定 vbNullString，可枚举出每种可用字体家族中的一种字体
lpEnumFontFamProc | Long，欲调用的函数地址。这个地址是用 AddressOf 运算符为来自一个标准模块的函数进行操作，或者利用某个回调控件得到
lParam | Long，指定希望传递给回调函数的一个用户自定义值
注解
这个函数取代了API函数 EnumFonts，因为它能对TureType字体样式说明进行控制 只有实际存在的字体才会列举出来，那些可由GDI合成的字体不会列出

Top