 - 加为好友
- 发送私信
- 在线聊天
|
| 发表于：2008-04-09 11:03:057楼 得分:0 |
昨天实践了一下,大体上解决方法就是1楼2楼给出的方法
我总结下 借花献佛 大家见笑 有不对的地方请指正
1 VB里引用 那个QMDispatch.dll
2 在系统中用regsvr32命令注册 DLL
注.QMDispatch.dll是按键精灵中 带的.
用regsvr32命令注册他的时候注意
1 路径中不能有中文名字(按键精灵默认的安装路径目录名是中文的)
2 单独把QMDispatch.dll这个文件复制到其他目录 注册也不起作用.
解决方法是把按键精灵 目录中的几个DLL文件一起复制到一个 目录中.然后执行 regsvr32 注册QMDispatch.dll 成功
3程序里加入 Private Declare Function FindPic Lib "QMDispatch" () As Long
4
dim pos as long
Set QMDispatchObj = CreateObject("QMDispatch.QMFunction")
参数 左, 上, 右, 下,寻找图片的路径,相似度
pos=QMDispatchObj.FindPic 0, 0, 1280, 1024, "E:\项目\梦幻西游外挂\进入游戏.bmp", 0.9
msgbox int(pos/8192)'X左边
msgbox pos MOD 8192 'Y左边
VB6SP6 XPSP2 下运行成功,之前把相似度设成 0.9找不到.后来改成了0.5 可以找到,但相对速度降低了一些.
| | |
修改
删除
举报
引用
回复
| |
