精华区文章阅读

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

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

GetKerningPairs

VB声明
Declare Function GetKerningPairs Lib "gdi32" Alias "GetKerningPairsA" (ByVal
hdc As Long, ByVal cPairs As Long, lpkrnpair As KERNINGPAIR) As Long
说明
取得指定字体的字距信息
返回值
Long，返回的字距对数量，零表示失败。会设置GetLastError
参数表
参数类型及说明
hdc Long，设备场景的句柄
cPairs Long，KERNINGPAIR结构在数组中的数量，由lpkrnpair参数指定。如果将这个参
数与lpkrnpair设置成零，可判断出字距表的大小
lpkrnpair KERNINGPAIR，指定KERNINGPAIR结构数组中的第一个条目
注解
参考KERNINGPAIR
返回以后，结构会针对数组中的每个条目象下面这样设置字段：
wFirst指定一个双字符序列的第一个字符；wSecond指定第二个字符。iKernAmount字段指
定指定这两个字符的字间距。
例如，假设第一个字符是"f"，第二个是"i"。那么在这两个字符一个紧接一个显示出来时
，字间距就是添加到默认字符间距上的一个逻辑距离。这个值通常为负，因为系统通常会
令两个字符靠得更近

--

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

VB 版 (精华区)