|
发表于 前天 08:27
高大上手机用户
|
显示全部楼层
江苏省徐州市
以下是在易语言中实现直接打印指定路径的一张图片和指定路径的Word文件的方法及示例代码(打印Word文件需系统安装有支持打印的办公软件如Microsoft Word等):
打印指定路径的一张图片
易语言可以调用系统的打印功能来打印图片,一般借助 PrintDocument 相关的API操作(在易语言中通过 eAPI 支持库来使用相关功能),以下是示例代码:
.版本 2
.支持库 eAPI
.子程序 _按钮1_被单击, , , 点击按钮打印指定路径的图片
.局部变量 图片路径, 文本型
.局部变量 打印作业句柄, 整数型
.局部变量 打印信息, 打印信息
.局部变量 结果, 整数型
图片路径 = “C:\test\example.jpg” '这里修改为你实际的图片路径
' 创建打印作业
打印作业句柄 = 打印作业_创建 (“”)
.如果真 (打印作业句柄 = 0)
信息框 (“创建打印作业失败!”, 0, “错误”)
返回 ()
.如果真结束
' 设置打印信息
打印信息.作业名称 = “图片打印”
打印信息.纸张类型 = #A4纸
打印信息.打印方向 = #纵向
' 开始打印作业
结果 = 打印作业_开始 (打印作业句柄, 打印信息)
.如果真 (结果 < 0)
信息框 (“开始打印作业失败!错误代码:” + 到文本 (结果), 0, “错误”)
打印作业_销毁 (打印作业句柄)
返回 ()
.如果真结束
' 加载图片并绘制到打印作业中(这里简单示例,实际可能需更复杂处理)
.局部变量 图片句柄, 整数型
图片句柄 = 载入图片 (图片路径)
.如果真 (图片句柄 ≠ 0)
打印作业_图片输出 (打印作业句柄, 100, 100, 图片句柄)
销毁图片 (图片句柄)
.如果真结束
' 结束打印作业
结果 = 打印作业_结束 (打印作业句柄)
.如果真 (结果 < 0)
信息框 (“结束打印作业失败!错误代码:” + 到文本 (结果), 0, “错误”)
.如果真结束
打印指定路径的Word文件
通常是通过调用系统中已安装的办公软件(如Word)来实现打印,这里使用 Shell 命令来调用外部程序执行打印操作,示例代码如下:
.版本 2
.支持库 shell
.子程序 _按钮2_被单击, , , 点击按钮打印指定路径的Word文件
.局部变量 wordFilePath, 文本型
wordFilePath = “C:\test\example.docx” '这里修改为你实际的Word文件路径
' 调用系统默认程序打开并打印Word文件
.如果真 (文件是否存在 (wordFilePath))
运行 (“winword.exe /q /n /mFilePrintDefault ” + wordFilePath, 假, )
.如果真结束
在上述代码中,/q 表示以安静模式运行Word(不显示界面),/n 表示新建一个文档,/mFilePrintDefault 表示使用默认打印机进行打印。
请注意,实际使用时请根据具体情况调整路径和参数,并且确保系统环境满足相应的运行条件。 |
|