易語言查找指定顏色並將鼠標移動到指定座標的代碼

今天小編就爲大家分享一篇關於易語言查找指定顏色並將鼠標移動到指定座標的代碼,小編覺得內容挺不錯的,現在分享給大家,具有很好的參考價值,需要的朋友一起跟隨小編來看看吧

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)
顏色畫板.畫板背景色 = 到整數 (編輯框顏色值.內容)
.子程序 __啓動窗口_創建完畢
_編輯框顏色值_內容被改變 ()

運行結果:

總結

以上就是這篇文章的全部內容了,希望本文的內容對大家的學習或者工作具有一定的參考學習價值,謝謝大家對神馬文庫的支持。如果你想了解更多相關內容請查看下面相關鏈接

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章