精华区文章阅读

发信人: bloom (├┝┞┟┠┢┣�), 信区: VB
标题: ExtCreatePen(绘图函数)(转载)
发信站: 哈工大紫丁香 (2000年09月07日18:36:49 星期四), 转信

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

ExtCreatePen

VB声明
Declare Function ExtCreatePen Lib "gdi32" Alias "ExtCreatePen" (ByVal
dwPenStyle As Long, ByVal dwWidth As Long, lplb As LOGBRUSH, ByVal
dwStyleCount As Long, lpStyle As Long) As Long
说明
创建一个扩展画笔（装饰或几何）
返回值
Long，如执行成功，返回一个指向扩展画笔的句柄。零表示执行出错。一旦不再需要，记
得用DeleteObject将画笔删除
参数表
参数类型及说明
dwPenStyle Long，画笔样式来自下述常数组的任何一个常数的组合（OR运算）：
PS_COSMETIC or PS_GEOMETRIC 画笔的类型
PS_ALTERNATE, PS_SOLID, PS_DASH, PS_DOT, PS_DASHDOT, PS_DASHDOTDOT, PS_NULL,
PS_USERSTYLE, PS_INSIDEFRAME 画笔的样式
PS_ENDCAP_??? 画笔的笔尖
PS_JOIN_??? 在图形中连接线段或在路径中连接直线的方式
dwWidth Long，指定线宽。几何画笔的线宽肯定是1
lplb LOGBRUSH，lbColor代表画笔颜色。对于装饰画笔，lbStyle为PS_SOLID；对于几何
画笔，lbStyle则代表实际的样式。针对几何画笔，必须设置其他所有字体
dwStyleCount Long，如指定了PS_USERSTYLE，则代表lpStyle数组中的条目数量
lpStyle Long，指定PS_USERSTYLE的“线段/空白”对（原文：Line/space pairs for
PS_USERSTYLE）

--

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

VB 版 (精华区)