易语言画板打印源码可以直接打印画板

陌路 2019-10-09 12:50:21
导读要记得把画板的自动重画设为真。不然打印的图片没问题,但是打印之后图片就可能残缺不全了哦,包括模块源码、编译好的模块、例程。

易语言画板打印源码可以直接打印画板

曾经一直很困惑画板在直接打印的时候比例始终不对。

经常打出来特别小,而且代码也很长。经过一天一夜的研究,终于搞懂了。

于是在这里班门弄斧。千万不要见笑。

做成模块之后只需使用这一句代码就可以了

原始绘图单位 = 要打印的画板.绘画单位
要打印的画板.绘画单位 = 用于打印的打印机组件.绘画单位
临时图片 = 取运行目录 () + “\TempPrintImage” + 到文本 (取现行时间 ()) + “.jpg”
写到文件 (临时图片, 要打印的画板.取图片 (要打印的画板.单位转换 (要打印的画板.宽度, 3), 要打印的画板.单位转换 (要打印的画板.高度, 4)))
图片号 = 载入图片 (临时图片)
用于打印的打印机组件.开始打印 (真, 真, , , , )
打印宽度 = 取图片宽度 (临时图片)
打印高度 = 取图片高度 (临时图片)
用于打印的打印机组件.画图片 (图片号, 0, 0, 打印宽度, 打印高度, 1)
用于打印的打印机组件.结束打印 ()
卸载图片 (图片号)
删除文件 (临时图片)
要打印的画板.绘画单位 = 原始绘图单位