额,这个大漠很是麻烦,研究了好几天了,还在大漠找字这里死循环呢,把我的代码给你参考一下,找字是没问题了,就是一绑定窗口就出问题,还没人帮我解决,纠结中……
空间 大漠找字练习
//定义默认空间
功能 逻辑型 找字练习()
逻辑型 是否成功
是否成功=大漠.创建()
如果(!是否成功)
辅助.消息框("请手动注册大漠")
返回 假
如果结束
是否成功=大漠.设置路径("rc:\\")
如果(!是否成功)
辅助.消息框("路径设置失败")
返回 假
如果结束
是否成功=大漠.设置字库(0,"rc:\\a.txt")
如果(!是否成功)
辅助.消息框("字库设置失败")
返回 假
如果结束
整型 找字
整型 x
整型 y
找字=大漠.找字(0,0,800,600,"学习资料","000000-000000",1.0,x,y)
如果(x>0)
大漠.移动(x,y)
大漠.左键单击()
否则
辅助.消息框(转换.整型转字符型(x))
辅助.消息框(转换.整型转字符型(y))
如果结束
是否成功=大漠.释放(0)
如果(!是否成功)
辅助.消息框("释放大漠失败")
返回 假
如果结束
返回 真
功能结束
功能 逻辑型 热键0_热键()
//这里添加你要执行的代码
大漠找字练习.找字练习()
返回 真
功能结束
功能 逻辑型 退出_点击()
//这里添加你要执行的代码
辅助.退出()
返回 真
//函数返回语句
功能结束
空间结束
//空间结束语句 |