亲宝软件园·资讯

展开

易语言查找指定颜色并移动鼠标 易语言查找指定颜色并将鼠标移动到指定坐标的代码

易语言源码教程 人气:0

DLL命令表

.版本 2
.DLL命令 移动鼠标, , "user32", "SetCursorPos"
 .参数 x, 整数型
 .参数 y, 整数型

查找指定颜色例程

.版本 2
.程序集 窗口程序集1
.子程序 _查找按钮_被单击, , , 查找颜色
.局部变量 临时字节集, 字节集
.局部变量 颜色, 字节集
.局部变量 找到位置, 整数型
.局部变量 x, 整数型
.局部变量 y, 整数型
.局部变量 宽, 整数型
.局部变量 高, 整数型
临时字节集 = 快照 (, , ) ' 取屏幕
宽 = 临时字节集 [19] + 临时字节集 [20] × 256
高 = 临时字节集 [23] + 临时字节集 [24] × 256
临时字节集 = 取字节集右边 (临时字节集, 取字节集长度 (临时字节集) - 54)
颜色 = { 0, 0, 0 }
颜色 [1] = 到字节 (到数值 (编辑框B.内容))
颜色 [2] = 到字节 (到数值 (编辑框G.内容))
颜色 [3] = 到字节 (到数值 (编辑框R.内容))
找到位置 = -1
.循环判断首 ()
 找到位置 = 寻找字节集 (临时字节集, 颜色, 找到位置 + 1)
 .如果真 (找到位置 = -1)
  跳出循环 ()
 .如果真结束
.循环判断尾 ((找到位置 - 1) % 3 ≠ 0)
.如果 (找到位置 ≠ -1)
 x = ((找到位置 - 1) ÷ 3 + 1) % 宽
 y = 高 - ((找到位置 - 1) ÷ 3 + 1) \ 宽
 编辑框结果.内容 = “X:” + 到文本 (x) + “ Y:” + 到文本 (y)
 .如果真 (选择框1.选中 = 真)
  移动鼠标 (x, y)
 .如果真结束
.否则
 编辑框结果.内容 = “没有找到”
.如果结束
.子程序 _编辑框颜色值_内容被改变
.局部变量 字节集, 字节集
.局部变量 R, 整数型
.局部变量 G, 整数型
.局部变量 B, 整数型
字节集 = 到字节集 (到整数 (编辑框颜色值.内容))
R = 字节集 [1]
G = 字节集 [2]
B = 字节集 [3]
编辑框R.内容 = 到文本 (R)
编辑框G.内容 = 到文本 (G)
编辑框B.内容 = 到文本 (B)
颜色画板.画板背景色 = 到整数 (编辑框颜色值.内容)
.子程序 __启动窗口_创建完毕
_编辑框颜色值_内容被改变 ()

运行结果:

总结

以上就是这篇文章的全部内容了,希望本文的内容对大家的学习或者工作具有一定的参考学习价值,谢谢大家对的支持。如果你想了解更多相关内容请查看下面相关链接

加载全部内容

相关教程
猜你喜欢
用户评论