|
<火山程序 类型 = "通常" 版本 = 1 />
类 打印机测试 <公开 折叠>
{
方法 打开打印机 <公开 静态 类型 = 整数 折叠 @嵌入式方法 = "">
参数 打印机名称 <类型 = 文本型>
参数 打印机句柄 <类型 = 变整数 注释 = "返回打印机句柄" @需求类型 = 可写入变量>
参数 pDefault <类型 = PRINTER_DEFAULTS指针 注释 = "可以提供空指针">
{
@ OpenPrinter(@<打印机名称>.GetText(), (LPHANDLE)&@<打印机句柄>, @<pDefault>)
}
方法 例子 <折叠>
{
变量 打印机句柄 <类型 = 变整数>
变量 pDefault <类型 = PRINTER_DEFAULTS指针>
打开打印机 ("名称", 打印机句柄, pDefault) // pDefault为空指针,不返回内容
调试输出 (打印机句柄)
}
方法 例子2 <折叠>
{
变量 打印机句柄 <类型 = 变整数>
变量 pDefault <类型 = PRINTER_DEFAULTS指针>
pDefault = PRINTER_DEFAULTS指针.创建 ()
打开打印机 ("名称", 打印机句柄, pDefault) // pDefault不为空指针,返回内容
调试输出 (打印机句柄, pDefault.pDatatype.取文本 (), pDefault.DesiredAccess)
pDefault.销毁 () // 创建后必须销毁
}
}
类 PRINTER_DEFAULTS指针 <公开 基础类 = 本地结构指针模板 折叠 @别名 = "PRINTER_DEFAULTS*" @模板实现类 = "PRINTER_DEFAULTS指针">
{
变量 pDatatype <公开 类型 = 常量文本指针 @输出名 = "pDatatype">
变量 "// pDevMode" <公开 类型 = LPDEVMODE 注释 = "这个结构体太复杂了,懒得封" @输出名 = "pDevMode">
变量 DesiredAccess <公开 类型 = 整数 @输出名 = "DesiredAccess">
}
|
|