TC官方合作论坛

 找回密码
 立即注册
查看: 139|回复: 2
打印 上一主题 下一主题

[已解决] 求大神解决“一键暂停恢复”怎么写

[复制链接]
跳转到指定楼层
楼主
发表于 2016-4-25 14:22:59 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上加入TC

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
变量 线程ID = 0
变量 暂停
//从这里开始执行
功能 执行()
    //从这里开始你的代码
    循环(100)
        调试输出("这个是热键执行的代码")
    结束
结束
//启动_热键操作
功能 启动_热键()
    如果(线程ID == 0)
        暂停 = 1
        线程ID = 线程开启("执行", "")
    否则
        消息框("脚本正在执行中,请先停止再启动.")
    结束
结束
//终止热键操作
功能 终止_热键()
    如果(线程ID != 0)
        线程关闭(线程ID)
        线程ID = 0        
    结束   
结束
功能 启动_失去焦点()
    //这里添加你要执行的代码
    热键销毁("启动")
    热键注册("启动")
结束
功能 终止_失去焦点()
    //这里添加你要执行的代码
    热键销毁("终止")
    热键注册("终止")
结束
功能 暂停_失去焦点()
    //这里添加你要执行的代码
    热键销毁("暂停")
    热键注册("暂停")
结束
功能 保存配置_点击()
    //这里添加你要执行的代码
    变量 键值 = 0, 功能键 = 0
    热键获取键码("启动", 键值, 功能键)
    文件写配置("热键", "启动键值", 键值, "D:\\Main.ini")
    文件写配置("热键", "启动功能键", 功能键, "D:\\Main.ini")
    热键获取键码("终止", 键值, 功能键)
    文件写配置("热键", "终止键值", 键值, "D:\\Main.ini")
    文件写配置("热键", "终止功能键", 功能键, "D:\\Main.ini")
结束
功能 aaa_初始化()
    //这里添加你要执行的代码
    变量 键值 = 0, 功能键 = 0
    键值 = 文件读配置("热键", "启动键值", "D:\\Main.ini")
    功能键 = 文件读配置("热键", "启动功能键", "D:\\Main.ini")
    如果(键值 != "")
        热键设置键码("启动", 键值, 功能键)
        热键注册("启动")
    结束
    键值 = 文件读配置("热键", "终止键值", "D:\\Main.ini")
    功能键 = 文件读配置("热键", "终止功能键", "D:\\Main.ini")
    如果(键值 != "")
        热键设置键码("终止", 键值, 功能键)
        热键注册("终止")
    结束
    变量 提示内容 = "鼠标移动到热键控件里,使得热键控件具有输入焦点,之后输入自己的热键,点击保存配置按钮,那么修改后的热键就会立即生效."
    标签设置文本("标签2", 提示内容)
结束
功能 暂停_热键()
    //这里添加你要执行的代码
    如果(线程ID != 0)
        如果(暂停 = 1)
            线程暂停(线程ID)
            调试输出("脚本已暂停")
            暂停 = 0
        否则
            暂停 = 1
            线程恢复(线程ID)
            调试输出("脚本已恢复")
        结束
    否则
        调试输出("请先开启脚本")
    结束
结束



代码如上。总是暂停了再按就还是暂停。求告知
用的6.0版本

回复

使用道具 举报

沙发
发表于 2016-4-25 14:33:08 | 只看该作者
此帖仅作者可见

使用道具 举报

板凳
 楼主| 发表于 2016-4-25 14:45:40 | 只看该作者
此帖仅作者可见

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

站长推荐上一条 /2 下一条

关闭

小黑屋|TC官方合作论坛 (苏ICP备18043773号

GMT+8, 2025-9-20 20:34 , Processed in 0.180968 second(s), 22 queries .

Powered by 海安天坑软件科技有限公司

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表