易语言反截图_【易语言】模仿QQ截图

该楼层疑似违规已被系统折叠 隐藏此楼查看此楼

主窗口：

.版本 2

.程序集 窗口程序集1

.子程序 _截取全屏_被选择

截取全屏1 ＝ 真

载入 (窗口截屏, , 真)

.子程序 _截取指定区域_被选择

截取全屏1 ＝ 假

载入 (窗口截屏, , 真)

第2个程序集

.版本 2

.程序集 窗口程序集2

.程序集变量 取范围, 逻辑型

.程序集变量 取点左, 短整数型

.程序集变量 取点上, 短整数型

.程序集变量 取点右, 短整数型

.程序集变量 取点下, 短整数型

.程序集变量 画图片, 逻辑型

.子程序 _窗口截屏_创建完毕

刷新显示 ()

窗口截屏.移动 (0, 0, 取屏幕宽度 (), 取屏幕高度 ())

画板1.移动 (0, 0, 取屏幕宽度 (), 取屏幕高度 ())

画板1.底图 ＝ 快照 (, , )

标签提示.标题 ＝ #换行符 ＋ “ A：按住鼠标左键拖取截屏范围。” ＋ #换行符 ＋ #换行符 ＋ “ B：按鼠标右键取消”

.如果真 (截取全屏1 ＝ 真)

隐藏画板.移动 (0, 0, 取屏幕宽度 (), 取屏幕高度 ())

画板1.复制 (0, 0, 取屏幕宽度 (), 取屏幕高度 (), 隐藏画板, 0, 0, )

复制图片到剪贴板 (隐藏画板.取图片 (, ))

剪取图片 ()

销毁 ()

.如果真结束

.子程序 _画板1_鼠标右键被按下