📄 createpen.htm
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style><!--
body,table {font-family:"宋体"; font-size: 9pt; line-height:11pt;}
a {text-decoration:none} a:hover {color:red;text-decoration:underline}
--></style>
<title>CreatePen</title>
</head>
<body background="../../../images/gray_weave.gif" link="#FF0000" vlink="#FF0000" alink="#FF0000" bgcolor="#FFC8C8">
<div align="center"><center>
<table border="0" width="100%" height="22" cellspacing="0" cellpadding="0">
<tr>
<td width="100%" height="16"><a name="CreatePen">CreatePen</a></td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="1" width="100%" bordercolorlight="#808080" cellspacing="0"
bordercolordark="#FFFFFF">
<tr>
<td width="103%" colspan="3">VB声明</td>
</tr>
<tr>
<td width="103%" colspan="3">Declare Function CreatePen Lib "gdi32" Alias
"CreatePen" (ByVal nPenStyle As Long, ByVal nWidth As Long, ByVal crColor As
Long) As Long</td>
</tr>
<tr>
<td width="103%" colspan="3">说明</td>
</tr>
<tr>
<td width="103%" colspan="3">用指定的样式、宽度和颜色创建一个画笔</td>
</tr>
<tr>
<td width="103%" colspan="3">返回值</td>
</tr>
<tr>
<td width="103%" colspan="3">Long，如函数执行成功，就返回指向新画笔的一个句柄；否则返回零</td>
</tr>
<tr>
<td width="103%" colspan="3">参数表</td>
</tr>
<tr>
<td width="25%">参数</td>
<td width="78%" colspan="2">类型及说明</td>
</tr>
<tr>
<td width="25%" rowspan="8">nPenStyle</td>
<td width="78%" colspan="2">Long，指定画笔样式，可以是下述常数之一</td>
</tr>
<tr>
<td width="37%">PS_SOLID</td>
<td width="38%">画笔画出的是实线</td>
</tr>
<tr>
<td width="37%">PS_DASH</td>
<td width="38%">画笔画出的是虚线（nWidth必须是1）</td>
</tr>
<tr>
<td width="37%">PS_DOT</td>
<td width="38%">画笔画出的是点线（nWidth必须是1）</td>
</tr>
<tr>
<td width="37%">PS_DASHDOT</td>
<td width="38%">画笔画出的是点划线（nWidth必须是1）</td>
</tr>
<tr>
<td width="37%">PS_DASHDOTDOT</td>
<td width="38%">画笔画出的是点-点-划线（nWidth必须是1）</td>
</tr>
<tr>
<td width="37%">PS_NULL</td>
<td width="38%">画笔不能画图</td>
</tr>
<tr>
<td width="37%">PS_INSIDEFRAME</td>
<td width="38%">画笔在由椭圆、矩形、圆角矩形、饼图以及弦等生成的封闭对象框中画图。如指定的准确RGB颜色不存在，就进行抖动处理</td>
</tr>
<tr>
<td width="25%">nWidth</td>
<td width="78%" colspan="2">Long，以逻辑单位表示的画笔的宽度</td>
</tr>
<tr>
<td width="25%">crColor</td>
<td width="78%" colspan="2">Long，画笔的RGB颜色</td>
</tr>
<tr>
<td width="103%" colspan="3">注解</td>
</tr>
<tr>
<td width="103%" colspan="3"><p align="left">一旦不再需要画笔，记得用<a
href="DeleteObject.htm">DeleteObject</a>函数将其删除</td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="0" width="100%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"><p align="right"><a href="#CreatePen">Top</a></td>
</tr>
</table>
</center></div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -