易语⾔查指定颜⾊并将⿏标移动到指定坐标的代码DLL命令表
.版本 2
.DLL命令移动⿏标, , "user32", "SetCursorPos"
.参数 x, 整数型
真空吸笔
.参数 y, 整数型煎蛋锅
查指定颜⾊例程
.版本 2
.⼦程序 _查按钮_被单击, , , 查颜⾊
.局部变量颜⾊, 字节集
.
局部变量到位置, 整数型
.局部变量 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)
颜⾊画板.画板背景⾊＝到整数 (编辑框颜⾊值.内容)
.⼦程序 __启动窗⼝_创建完毕
_编辑框颜⾊值_内容被改变 ()
运⾏结果：
总结
以上就是这篇⽂章的全部内容了，希望本⽂的内容对⼤家的学习或者⼯作具有⼀定的参考学习价值，谢谢⼤家对的⽀持。如果你想了解更多相关内容请查看下⾯相关链接
豫公网安备41160202000603
站长QQ:729038198
关于我们
投诉建议