#import "dm.dmsoft" dm
空间 大漠后台找图
//定义默认空间
字符型 标签0文本,标签1文本,标签2文本,标签3文本
整型 窗口句柄
整型 绑定窗口是否成功
//创建插件注册函数
功能 逻辑型 插件注册()
逻辑型 插件注册成功=辅助.是否注册("dm.dmsoft")
//判断插件是否注册成功
如果(插件注册成功)
标签.设置文本("标签0","插件已成功注册")
否则
标签.设置文本("标签0","请先注册插件")
如果结束
返回 真
功能结束
功能 逻辑型 找到窗口()
窗口句柄=dm.FindWindow("","我的电脑")
//判断我的电脑窗口是否打开
如果(窗口句柄==0)
标签.设置文本("标签1","没有找到窗口")
否则
标签.设置文本("标签1","成功找到窗口")
//判断窗口是否绑定
绑定窗口是否成功=dm.BindWindow(窗口句柄,"dx","dx","dx",0)
如果(绑定窗口是否成功==1)
标签.设置文本("标签2","成功绑定窗口")
否则
标签.设置文本("标签2","绑定窗口不成功")
如果结束
如果结束
返回 真
功能结束
//创建后台找图函数
功能 逻辑型 后台找图()
字符型 路径=辅助.获取资源路径("rc:")
整型 设定路径是否成功=dm.SetPath(路径)
整型 X,Y
如果(绑定窗口是否成功==1)
//整型 找图是否成功=dm.FindPic(0,0,2000,2000,"F:\\gxwd.bmp","000000",0.9,0,X,Y)
整型 找图是否成功=dm.FindPic(0,0,2000,2000,"1.bmp","000000",0.9,0,X,Y)
如果(找图是否成功==1)
标签.设置文本("标签3",转换.整型转字符型(X))
否则
标签.设置文本("标签3","没有找到图片")
如果结束
否则
标签.设置文本("标签2","绑定窗口失败")
如果结束
返回 真
功能结束
功能 逻辑型 开始_点击()
//这里添加你要执行的代码
大漠后台找图.插件注册()
辅助.等待(1000)
大漠后台找图.找到窗口()
辅助.等待(1000)
大漠后台找图.后台找图()
辅助.等待(1000)
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
dm.UnBindWindow()
辅助.退出()
返回 真
//函数返回语句
功能结束
空间结束
//空间结束语句
========================
给个源码你参考下 |