马上加入TC
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
求大侠帮忙看一下,大漠后台循环找图,第一次找到图后输出的x y坐标是正确的,但是第二次找图,就算没有图仍然显示找到图了,而且就是第一次找到的图的坐标,代码如下:
功能 脚本线程()
变量 dm,ts,hwnd,ret,rat,find,s,u,c,t,x,y
dm=com("dm.dmsoft") //调用大漠
等待(100)
t=dm.SetPath("E:\\test") //设置路径
等待(100)
u=dm.SetDict(0,"tc.txt") //设置字库
等待(100)
如果(u==0)
消息框("失败")
结束
c=dm.GetNowDict() //获取字库序号
调试输出(c)
等待(200)
消息框("请将鼠标放在指定窗口,并等待2秒")
等待(1500)
hwnd=dm.GetMousePointWindow() //鼠标获取窗口句柄
调试输出(hwnd)
如果(hwnd==0)
消息框("获取句柄失败")
结束
等待(500)
ret = dm.BindWindow(hwnd,"gdi","windows","windows",0) //绑定后台
如果(ret==0)
消息框("绑定后台失败")
结束
等待(1000)
循环(I)
等待(500)
find =dm.FindPic(0,0,1920,1080,"7.bmp","000000",0.9,0,x,y) //后台找图
调试输出(find)
调试输出(x)
调试输出(y)
等待(500)
如果(find>-1)
等待(200)
dm.MoveTo(x,y)
等待(10)
dm.LeftClick()
否则
调试输出("未找到")
结束
等待(500)
ts.FreeProcessMemory(hwnd)
等待(1500)
find =dm.FindPic(0,0,200,200,"11.bmp","000000",0.9,0,x,y) //后台找图
调试输出(find)
调试输出(x)
调试输出(y)
等待(500)
如果(find>-1)
跳出
否则
调试输出("未找到")
结束
等待(500)
结束
s=dm.UnBindWindow()
如果(s==1)
消息框("解绑成功")
结束
结束
|