|
前天做了一个按键脚本,发给朋友用没有出现问题.可是我增加一个复选框代码在发给他运行脚本就出现应用程序错误. 不只是一台半台电脑出现这种情况,还有一部分人不能用.
以前本以为是TC多点找色的缘故,原来不单单是多点找色问题.而TC软件也有问题.本人用TC3.046.
我希望这次能够有好的解决方法。
- #import "dm.dmsoft" dm
- 空间 结晶
- //定义默认空间
- int 线程状态
- 整型 线程句柄
- 功能 逻辑型 开始_点击()
- //这里添加你要执行的代码
- 整型 窗口句柄
- 窗口句柄=窗口.鼠标所在窗口句柄()
- 如果(窗口句柄==0) //判断是否获取到了窗口句柄
- 辅助.对话框("没有获取窗口句柄","信息",2,真)
- 否则
- 窗口.激活(窗口句柄)
- 辅助.等待(100)
- 窗口.还原(窗口句柄)
- 辅助.等待(100)
- //窗口.还原(窗口句柄字符串)
- //窗口.设置位置(窗口句柄,0,0)
- 辅助.等待(100)
- 整型 是否绑定成功
- 是否绑定成功=dm.BindWindow(窗口句柄,"normal","windows","windows",0)
- 如果(是否绑定成功==0)
- 辅助.对话框("绑定失败","βヽ信息",2,真)
- 如果结束
- 如果结束
- 循环(真)
- 遍历(100)
- 如果(单选框.获得状态("单选框0"))
- 辅助.等待(1000)
- dm.MoveTo(419,199)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(单选框.获得状态("单选框1"))
- 辅助.等待(1000)
- dm.MoveTo(555,196)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(单选框.获得状态("单选框2"))
- 辅助.等待(1000)
- dm.MoveTo(681,198)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(1000)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(单选框.获得状态("单选框3"))
- 辅助.等待(1000)
- dm.MoveTo(419,379)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(单选框.获得状态("单选框4"))
- 辅助.等待(1000)
- dm.MoveTo(555,373)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(单选框.获得状态("单选框5"))
- 辅助.等待(1000)
- dm.MoveTo(683,369)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.MoveTo(357,479)
- 辅助.等待(10)
- dm.LeftClick()
- 辅助.等待(500)
- dm.KeyPress(13)
- 辅助.等待(10)
- dm.KeyPress(13)
- 如果结束
- 如果(复选框.获得状态("复选框0"))
- 辅助.等待(500)
- 整型 按键=0
- 字符型 获取按键
- 获取按键=编辑框.获得文本("编辑框0")
- 循环(真)
- 辅助.等待(800)
- dm.MoveTo(606,465)
- 辅助.等待(10)
- dm.LeftClick()
- 按键=按键+1
- 如果(按键==(转换.字符型转整型(获取按键,0)))
- 跳出
- 如果结束
- 辅助.等待(100)
- 循环结束
- 如果结束
- 遍历结束
- 辅助.等待(100)
- 循环结束
- 返回 真
- //函数返回语句
- 功能结束
- 功能 逻辑型 退出_点击()
- //这里添加你要执行的代码
- 辅助.退出()
- 返回 真
- //函数返回语句
- 功能结束
- 功能 逻辑型 热键1_热键()
- //这里添加你要执行的代码
- 控件.可见("标签4",真)
- 控件.可见("标签5",真)
- 控件.有效("单选框0",真)
- 控件.有效("单选框1",真)
- 控件.有效("单选框2",真)
- 控件.有效("单选框3",真)
- 控件.有效("单选框4",真)
- 控件.有效("单选框5",真)
- 控件.有效("编辑框0",真)
- dm.UnBindWindow()
- 如果(线程状态==1)
- 线程.关闭(线程句柄)
- 线程状态=0
- 如果结束
- 返回 真
- 功能结束
- 功能 逻辑型 热键0_热键()
- //这里添加你要执行的代码
- 控件.可见("标签4",假)
- 控件.可见("标签5",假)
- 控件.有效("单选框0",假)
- 控件.有效("单选框1",假)
- 控件.有效("单选框2",假)
- 控件.有效("单选框3",假)
- 控件.有效("单选框4",假)
- 控件.有效("单选框5",假)
- 控件.有效("编辑框0",假)
- 如果(线程状态!=1)
- 线程句柄=线程.开启("结晶.开始_点击","")
- 线程状态=1
- 如果结束
- 返回 真
- 功能结束
- 功能 逻辑型 初始化()
- //这里添加你要执行的代码
- 逻辑型 是否成功=辅助.是否注册("dm.dmsoft")
- 如果(是否成功)
- 如果结束
- 是否成功=辅助.注册插件("rc:\\dm.dll",真)
- 如果(是否成功)
- 如果结束
- 返回 真
- 功能结束
- 空间结束
- //空间结束语句
复制代码
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|