|
|
提示不正确的控件名。。不知道那个控件问题。
还有喊话间隔时间哪里没有起到作用，
代码
空间 自动喊话工具
逻辑型 编辑框0,编辑框1,编辑框2,编辑框3,编辑框4
整型 时间间隔,复选框0,复选框1,复选框2,复选框3,复选框4,发送内容
字符型 喊话内容,喊话内容1,喊话内容2,喊话内容3,喊话内容4,秒时间
整型 窗口,线程句柄
功能 逻辑型 喊话()
循环(真)
辅助.等待(2000)
窗口=窗口.鼠标所在窗口句柄()
秒时间=编辑框.获得文本("秒时间")
时间间隔=转换.字符型转整型(秒时间)
编辑框0=复选框.获得状态("复选框0")
如果(编辑框0==真)
喊话内容=编辑框.获得文本("编辑框0")
超级键盘.按键(13,1)
辅助.等待(2000)
辅助.写入剪切板(喊话内容)
超级键盘.按下(17)
超级键盘.按下(86)
超级键盘.弹起(17)
超级键盘.弹起(86)
辅助.等待(1000)
超级键盘.按键(13,1)
如果结束
秒时间=编辑框.获得文本("秒时间")
时间间隔=转换.字符型转整型(秒时间)
编辑框1=复选框.获得状态("复选框1")
如果(编辑框1==真)
喊话内容1=编辑框.获得文本("编辑框1")
超级键盘.按键(13,1)
辅助.等待(2000)
辅助.写入剪切板(喊话内容1)
超级键盘.按下(17)
超级键盘.按下(86)
超级键盘.弹起(17)
超级键盘.弹起(86)
辅助.等待(1000)
超级键盘.按键(13,1)
如果结束
秒时间=编辑框.获得文本("秒时间")
时间间隔=转换.字符型转整型(秒时间)
编辑框2=复选框.获得状态("复选框2")
如果(编辑框2==真)
喊话内容2=编辑框.获得文本("编辑框2")
超级键盘.按键(13,1)
辅助.等待(2000)
辅助.写入剪切板(喊话内容2)
超级键盘.按下(17)
超级键盘.按下(86)
超级键盘.弹起(17)
超级键盘.弹起(86)
辅助.等待(1000)
超级键盘.按键(13,1)
如果结束
秒时间=编辑框.获得文本("秒时间")
时间间隔=转换.字符型转整型(秒时间)
编辑框3=复选框.获得状态("复选框3")
如果(编辑框3==真)
喊话内容3=编辑框.获得文本("编辑框3")
超级键盘.按键(13,1)
辅助.等待(2000)
辅助.写入剪切板(喊话内容3)
超级键盘.按下(17)
超级键盘.按下(86)
超级键盘.弹起(17)
超级键盘.弹起(86)
辅助.等待(1000)
超级键盘.按键(13,1)
如果结束
秒时间=编辑框.获得文本("秒时间")
时间间隔=转换.字符型转整型(秒时间)
编辑框4=复选框.获得状态("复选框4")
如果(编辑框4==真)
喊话内容4=编辑框.获得文本("编辑框4")
超级键盘.按键(13,1)
辅助.等待(2000)
辅助.写入剪切板(喊话内容4)
超级键盘.按下(17)
超级键盘.按下(86)
超级键盘.弹起(17)
超级键盘.弹起(86)
辅助.等待(1000)
超级键盘.按键(13,1)
如果结束
循环结束
返回 真
功能结束
功能 逻辑型 开始_点击()
线程句柄=线程.开启("自动喊话工具.喊话","")
控件.有效("开始_点击",假)
如果(线程句柄==0)
辅助.消息框("加载线程失败")
否则
如果结束
返回 真
//函数返回语句
功能结束
功能 逻辑型 退出_点击()
辅助.退出()
线程.关闭(线程句柄)
返回 真
//函数返回语句
功能结束
功能 逻辑型 热键0_热键()
逻辑型 恢复
恢复=线程.恢复(线程句柄)
返回 真
功能结束
功能 逻辑型 热键1_热键()
//这里添加你要执行的代码
逻辑型 暂停
暂停=线程.暂停(线程句柄)
返回 真
功能结束
空间结束
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看，没有帐号？立即注册
x
|
/2 
发表于 2012-7-27 23:23:29
收藏
支持
反对
发表于 2012-7-28 09:46:12
发表于 2012-7-28 00:16:15
楼主
