大漠插件找字找完了 怎么用按键精灵双击这个字
Setdm=createobject("dm.dmsoft")TracePrintdm.Ver()dm.setPath"E:\bmp"dm.setDict0,"dm_so...
Set dm = createobject("dm.dmsoft")
TracePrint dm.Ver()
dm.setPath "E:\bmp"
dm.setDict 0,"dm_soft.txt"
hp = dm.Ocr(50, 607, 77, 627, "ffffff-000000", 1.0)
MessageBox hp
我想不让他出来弹窗 而是鼠标移动到字上并双击它
赐教我想怎么不点窗口而是鼠标移动到大漠找的这个字然后双击 展开
TracePrint dm.Ver()
dm.setPath "E:\bmp"
dm.setDict 0,"dm_soft.txt"
hp = dm.Ocr(50, 607, 77, 627, "ffffff-000000", 1.0)
MessageBox hp
我想不让他出来弹窗 而是鼠标移动到字上并双击它
赐教我想怎么不点窗口而是鼠标移动到大漠找的这个字然后双击 展开
2个回答
展开全部
晕·楼上回答的跟本和题目无关嘛·如果是用大漠找字双击的话可以用下边这句:
dm.FindStr(0, 0, 0, 0, “你要找的字", "000000-000000", 1.0, intX, intY)
你的程序可以这样改:
Set dm = createobject("dm.dmsoft")
TracePrint dm.Ver()
dm.setPath "E:\bmp"
dm.setDict 0,"dm_soft.txt"
hp = dm.Ocr(50, 607, 77, 627, "ffffff-000000", 1.0)
//====================================加的下边的
base_path = dm.GetBasePath()
dm_ret = dm.SetPath(base_path)
call dm.FindStr(50, 607, 77, 627, hp, "ffffff-000000", 1.0, intX, intY)
If intX >= 0 and intY >= 0 Then
dm.MoveTo intX,intY //这里找到的坐标的字的左上角,你可以加偏移量比如intX+5,intY+5
LeftDoubleClick 1
End If
前题是你要注册过大漠插件·不过你上边的程序能弹出找到的字,应该是已经正确注册过大漠了。
dm.FindStr(0, 0, 0, 0, “你要找的字", "000000-000000", 1.0, intX, intY)
你的程序可以这样改:
Set dm = createobject("dm.dmsoft")
TracePrint dm.Ver()
dm.setPath "E:\bmp"
dm.setDict 0,"dm_soft.txt"
hp = dm.Ocr(50, 607, 77, 627, "ffffff-000000", 1.0)
//====================================加的下边的
base_path = dm.GetBasePath()
dm_ret = dm.SetPath(base_path)
call dm.FindStr(50, 607, 77, 627, hp, "ffffff-000000", 1.0, intX, intY)
If intX >= 0 and intY >= 0 Then
dm.MoveTo intX,intY //这里找到的坐标的字的左上角,你可以加偏移量比如intX+5,intY+5
LeftDoubleClick 1
End If
前题是你要注册过大漠插件·不过你上边的程序能弹出找到的字,应该是已经正确注册过大漠了。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询