精易论坛

标题: 如何遍历数组,并按照顺序依次点击 [打印本页]

作者: 乔一 时间: 2024-7-20 20:11
标题: 如何遍历数组,并按照顺序依次点击
; 需要点击的数字序列
numbers := ["2", "3", "1", "5", "0", "8"]

; 依次查找并点击数字
for number in numbers {
      findstr := dm.FindStrFast(0, 0, 3440, 1440, number, "fefefe-404040", 1, &intX, &intY)
      if (findstr != -1) {
         dm.MoveTo(intX, intY)
         dm.Delay(100)
         dm.LeftClick()
         Sleep 100
      } else {
         MsgBox "未找到数字: " . number
         return
      }
}

易语言新手,不知道易语言的数组如何定义,如何遍历. 如何实现上述代码同样的功能(上面是我用ahk写的)

作者: 乔一 时间: 2024-7-20 21:18
自己解决了

数组＝ { 2, 3, 2, 5, 0, 8 }
.计次循环首 (取数组成员数 (数组), i)
大漠.SetWindowState (hwnd, 1)
文字查找＝大漠.FindStrFast (0, 0, 3440, 1440, 到文本 (数组 ), “fefefe-404040”, 1, 返回x, 返回y)
.如果 (文字查找 ≠ -1)
      大漠.MoveTo (返回x, 返回y)
      延迟 (100)
      大漠.LeftClick ()
      延迟 (100)
.否则
      信息框 (“没找到数字:” ＋到文本 (数组 ), 0, , )
      跳出循环 ()
.如果结束

.计次循环尾 ()

欢迎光临精易论坛 (https://125.confly.eu.org/)