建设银行回执单生成器,可以加入邮政农业工商中国,易语言源码分享!

当然下面这个是建设银行的回执单生成器,声明:我加了水印,防止被人做坏事,这里分享的目的就是把原理和代码分享出来,模版我加了水印,你也用不了,我这个图是自己做学习娱乐用的,也是网上找的,生成图片用的是易语言的快照截图命令,通过获取画板的窗口坐标,具体代码和界面请在下面看。

首页框架截图:

参数输入界面:

完整代码分享:

=======================================

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _标签16_反馈事件, 整数型

.参数 参数一, 整数型

.参数 参数二, 整数型

.子程序 _分组框1_鼠标左键被按下, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

.子程序 _按钮1_被单击

标签1.标题 = 编辑框1.内容

标签2.标题 = 编辑框2.内容

标签3.标题 = 编辑框3.内容

标签4.标题 = 编辑框4.内容

标签5.标题 = 编辑框5.内容

标签6.标题 = 编辑框6.内容

标签7.标题 = 编辑框7.内容

标签8.标题 = 编辑框8.内容

标签9.标题 = 编辑框9.内容

标签10.标题 = 编辑框10.内容

标签11.标题 = 编辑框11.内容

标签12.标题 = 编辑框12.内容

标签13.标题 = 编辑框13.内容

标签14.标题 = 编辑框14.内容

标签15.标题 = 编辑框15.内容

标签16.标题 = 编辑框16.内容

标签17.标题 = 编辑框17.内容

标签18.标题 = 编辑框18.内容

标签19.标题 = 编辑框19.内容

标签20.标题 = 编辑框20.内容

标签21.标题 = 编辑框21.内容

标签22.标题 = 编辑框22.内容

写到文件 (取运行目录 () + "1.jpg", 快照 (图片框1.取窗口句柄 (), , ))

.子程序 _图片框1_鼠标左键被按下, 逻辑型

.参数 横向位置, 整数型

.参数 纵向位置, 整数型

.参数 功能键状态, 整数型

标签1.标题 = 编辑框1.内容

标签2.标题 = 编辑框2.内容

标签3.标题 = 编辑框3.内容

标签4.标题 = 编辑框4.内容

标签5.标题 = 编辑框5.内容

标签6.标题 = 编辑框6.内容

标签7.标题 = 编辑框7.内容

标签8.标题 = 编辑框8.内容

标签9.标题 = 编辑框9.内容

标签10.标题 = 编辑框10.内容

标签11.标题 = 编辑框11.内容

标签12.标题 = 编辑框12.内容

标签13.标题 = 编辑框13.内容

标签14.标题 = 编辑框14.内容

标签15.标题 = 编辑框15.内容

标签16.标题 = 编辑框16.内容

标签17.标题 = 编辑框17.内容

标签18.标题 = 编辑框18.内容

标签19.标题 = 编辑框19.内容

标签20.标题 = 编辑框20.内容

标签21.标题 = 编辑框21.内容

标签22.标题 = 编辑框22.内容

写到文件 (取运行目录 () + "1.jpg", 快照 (图片框1.取窗口句柄 (), , ))

=================================================

相关推荐
不染尘.30 分钟前
Linux磁盘分区和NAT网络配置
linux·运维·网络·windows·ssh
私人珍藏库31 分钟前
[Windows] 文件管理大师 FileMasterPro v1.2.5
windows·文件管理·工具·软件·win
xuyuan19981 小时前
超越Selenium:自动化测试框架Cypress在现代前端测试中的卓越实践(windows版本)三
前端·windows·测试工具·系统架构·cypress
玖釉-1 小时前
[Vulkan 学习之路] 20 - 顶点缓冲区:创建顶点缓冲区 (Vertex Buffer Creation)
c++·windows·图形渲染
Knight_AL1 小时前
Spring Boot 中优雅地使用责任链模式(@Order 实战)
windows·spring boot·责任链模式
牵牛老人2 小时前
Windows下安装Qt后再添加或移除Qt组件需要组件的有效资料档案库如何处理
开发语言·windows·qt
玖釉-2 小时前
[Vulkan 学习之路] 17 - 拒绝摸鱼:多帧并行 (Frames in Flight)
c++·windows·图形渲染
不染尘.2 小时前
Linux进程与服务管理
linux·运维·服务器·windows·centos·ssh
玖釉-13 小时前
[Vulkan 学习之路] 08 - 给图片穿马甲:图像视图 (Image Views)
c++·windows·图形渲染
古城小栈15 小时前
Rust 交叉编译:Windows ====> Linux (musl 静态编译)
linux·windows·rust