📄 setabortproc.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>SetAbortProc</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">SetAbortProc</td>
</tr>
</table>
</center></div><div align="center"><center>
<table border="1" width="100%" bordercolorlight="#808080" cellspacing="0"
bordercolordark="#FFFFFF">
<tr>
<td width="100%" colspan="2">VB声明</td>
</tr>
<tr>
<td width="100%" colspan="2">Declare Function SetAbortProc Lib "gdi32" Alias
"SetAbortProc" (ByVal hDC As Long, ByVal lpAbortProc As Long) As Long</td>
</tr>
<tr>
<td width="100%" colspan="2">说明</td>
</tr>
<tr>
<td width="100%" colspan="2">我们可以为Windows提供一个特殊的函数，令其在扩展打印操作过程中调用。这个函数叫“取消函数”。其结果告诉Windows是继续打印操作，还是立即取消<br>
SetAbortProc函数的作用是为windows指定取消函数的地址。由于VB不支持函数地址的概念，所以要使用特定的通用回调定制控件，否则就不能使用这个函数</td>
</tr>
<tr>
<td width="100%" colspan="2">返回值</td>
</tr>
<tr>
<td width="100%" colspan="2">Long，如结果大于零，表示执行成功；SP_ERROR表示出错。会设置<a
href="GetLastError.htm">GetLastError</a></td>
</tr>
<tr>
<td width="100%" colspan="2">参数表</td>
</tr>
<tr>
<td width="25%">参数</td>
<td width="75%">类型及说明</td>
</tr>
<tr>
<td width="25%">hDC</td>
<td width="75%">Long，一个设备场景的句柄。</td>
</tr>
<tr>
<td width="25%">lpAbortProc</td>
<td width="75%">Long，一个取消函数的地址</td>
</tr>
<tr>
<td width="100%" colspan="2">在VB里使用</td>
</tr>
<tr>
<td width="100%" colspan="2">如随同VB的打印机对象使用这个函数，就可能干扰正常的VB打印机制。这个函数的确可以在VB环境中使用，但有可能造成打印机出错。因此，在下一次使用Printer.NewPage方法的时候，有必要用适当的机制捕获这种错误。如果在自己的程序中为VB的Printer对象设置了一个取消函数，那么建议您完整测试代码<br>
如果在自己创建的一个设备场景中打印，那么这个函数的使用没有丝毫问题</td>
</tr>
</table>
</center></div>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -