打印机模块源码

小时 · 发表于 2013-12-7 14:04:54

[e]
.版本 2.子程序添加打印机, 整数型, 公开, 在系统中添加一台新打印机如执行成功，返回一台新打印机的句柄；零表示失败。会设置GetLastError.参数服务器名字, 文本型, , 欲在其中安装打印机的一个服务器的名字。对本地打印机，设为vbNull.参数固定值, 整数型, , 设为2.参数缓冲区, 整数型, , 指定一个缓冲区的第一个条目。该缓冲区包含了一个PRINTER_INFO_2结构。结构中的下述字段会设为有效值：pPrinterName， pPortName， pDriverName， pPrintProcessor 和 pDataType。也可象PRINTER_INFO_2那样设置pPrinter字段。也可以设置下述字段：Attributes， DefaultPriority， pComment， pDevMode， pLocation， pParameters， Priority， pSecurityDescriptor， pSepFile， pShareName， StartTime 和 UntilTime。而其他字段都应置空;API_添加打印机 (服务器名字, 固定值, 缓冲区).子程序添加打印机新表单, 整数型, 公开, 为打印机的表单列表添加一个新表单。“表单”描述了一个页面大小及布局，提供了一种与设备无关的机制，可实现Windows ; NT下的纸张尺寸的标准化非零表示成功，零表示失败。会设置GetLastError.参数打印机句柄, 整数型, , 一个已打开的打印机对象的句柄（用OpenPrinter获得）.参数固定值, 整数型, , 设为1.参数表单结构, 字节型, , FORM_INFO_1，对表单进行描述的一个结构适用平台Windows NT其他在VB的API文本查看器里复制的声明如下：Declare Function AddForm Lib "winspool.drv" Alias "AddFormA" (ByVal hPrinter As Long, ByVal Level As Long, pForm As Byte) As Long;API_添加打印机新表单 (打印机句柄, 固定值, 表单结构).子程序取消文档打印, 整数型, 公开.参数设备场景句柄, 整数型, , 设备场景的句柄在VB里使用如将这个函数用于由打印机对象的hDC属性指定的打印机设备场景，那么它可以正常发挥作用。然而，倘若之后调用了EndDoc方法，却有可能得到一条打印机出错消息。当大家结合API打印函数与VB打印机方法的时候，强烈建议对打印机的错误进行跟踪捕获；或干脆避免这种结合;API_取消文档打印 (设备场景句柄).子程序添加打印机监视器, 整数型, 公开.参数服务器名称, 文本型, , 欲在其中安装监视器的一个服务器的名字。对于本地（本机）监视器，请设置成vbNull.参数固定值, 整数型, , 设为2.参数结构首字节, 字节型, , 指定一个结构中的第一个字节。那个结构又包含了一个MONITOR_INFO_2结构;API_添加打印机监视器 (服务器名称, 固定值, 结构首字节).子程序连接打印机, 整数型, 公开.参数打印机名字, 文本型API_连接打印机 (打印机名字).子程序添加打印驱动程序, 整数型, 公开.参数服务器名字, 文本型, , 指定要在其中安装驱动程序的一台服务器的名字。对于本地系统，设为vbNull.参数固定值, 整数型, , 2或3（2仅适用于NT 3.51）.参数缓冲区, 整数型, , 指定一个缓冲区，其中包含了一个DRIVER_INFO_2 或 DRIVER_INFO_3结构，它们指定了要添加的驱动程序;API_添加打印驱动程序 (服务器名字, 固定值, 缓冲区).子程序添加打印处理器, 整数型, 公开.参数服务器名字, 文本型, , 指定要在其中安装驱动程序的一台服务器的名字。对于本地系统，设为vbNull.参数添加环境, 文本型, , 要在其中添加打印处理器的一个环境（如“Windows NT x86”）。对于当前（本地）系统环境，则设为vbNull.参数处理器文件名, 文本型, , 包含了打印管理器的一个文件的名字。文件必须位于打印处理器目录中.参数处理器名字, 文本型, , 打印处理器的名字;API_添加打印处理器 (服务器名字, 添加环境, 处理器文件名, 处理器名字).子程序添加打印供应商, 整数型, 公开.参数服务器名字, 文本型, , 指出要在其中安装打印供应商的一台服务器的名字。对于本地系统，设为vbNull.参数固定值, 整数型, , 设为1.参数供应商结构, 字节型, , 包含了一个PROVIDOR_INFO_1结构的缓冲区;API_添加打印供应商 (服务器名字, 固定值, 供应商结构)
[/e]