Hwnd = 2821484
XY = Plugin.Bkgnd.FindPic(Hwnd, 0, 0, 800, 580, "F:\图片素材\建筑.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If iZB > 0 Then
Call Plugin.Bkgnd.MoveTo(Hwnd, X+10, Y+10)
Call Plugin.Bkgnd.LeftClick(Hwnd, X+10, Y+10)
End If
XY = Plugin.Bkgnd.FindPic(Hwnd, 0, 0, 800, 580, "F:\图片素材\建筑.bmp", 0, 0.9)
iZB = InStr(XY, "|")
X = CLng(Left(XY, iZB - 1))
Y = CLng(Right(XY, Len(XY) - iZB))
If iZB > 0 Then
Call Plugin.Bkgnd.MoveTo(Hwnd, X+10, Y+10)
Call Plugin.Bkgnd.LeftClick(Hwnd, X+10, Y+10)
End If
IP属地:辽宁
3楼2017-02-09 13:51
3楼2017-02-09 13:51收起回复
