精华区文章阅读

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

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

GrayString, GrayStringByString

VB声明
Declare Function GrayString& Lib "user32" Alias "GrayStringA" (ByVal hDC As
Long, ByVal hBrush As Long, ByVal lpOutputFunc As Long, ByVal lpData As Long,
ByVal nCount As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long,
ByVal nHeight As Long)
Declare Function GrayStringByString& Lib "user32" Alias "GrayStringA" (ByVal
hDC As Long, ByVal hBrush As Long, ByVal lpOutputFunc As Long, ByVal lpData
As String, ByVal nCount As Long, ByVal X As Long, ByVal Y As Long, ByVal
nWidth As
Long, ByVal nHeight As Long)
说明
描绘一个以灰色显示的字串。通常由Windows用于标识禁止状态。这个函数使用的是当前
字体，但会忽略背景及文本颜色
返回值
Long，非零表示成功。如果TextOut函数或回调控件绘图事件返回零，那么该函数也会返
回零
参数表
参数类型及说明
hDC Long，设备场景的句柄
hBrush Long，用于填充灰色的一个刷子。如果为零就用当前刷子
lpOutputFunc Long，指向一个函数的指针，该函数用于输出文本。通常设为零，表示使
用TextOut函数。否则可将该参数设成一个进程地址。具体地址可用一个标准函数的
AddressOf运算符返回，或者用一个回调控件的相关属性返回
lpData Long，如果是一个字串（将lpOutputFunc设为NULL），这就表示要以灰色显示的
一个字串。否则就指定一个Long型变量，将其传递给回调函数
nCount Long，欲显示的字符数量。如果设为零，而且lpData是个字串，那么就用于计算
字串的长度
X,Y Long，将字串封闭（约束）起来的一个矩形的X，Y坐标
nWidth Long，将字串封闭起来的一个矩形的宽度，采用设备坐标表示。如设为零，就根
据字串计算出具体的值
nHeight Long，将字串封闭起来的一个矩形的高度，采用设备坐标表示。如设为零，就根
据字串计算出具体的值

--

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

VB 版 (精华区)