键盘鼠标不动2分钟后就不执行命令
键盘鼠标不动2分钟后就执行下面的命令,这时间要显示倒计时。忘高手写出附上源码,谢谢! .版本 2
.程序集 窗口程序集1
.程序集变量 秒, 整数型
.程序集变量 分, 整数型
.程序集变量 水平位置, 整数型
.程序集变量 垂直位置, 整数型
.子程序 __启动窗口_创建完毕
秒 = 0
分 = 1
时钟2.时钟周期 = 1
.子程序 _时钟1_周期事件
.如果 (水平位置 = 取鼠标水平位置 () 且 垂直位置 = 取鼠标垂直位置 ())
秒 = 秒 + 1
.如果真 (秒 = 60)
秒 = 0
分 = 分 - 1
.如果真结束
.如果真 (分 = 0 且 秒 = 0)
结束 ()
.如果真结束
编辑框1.内容 = “剩余” + 到文本 (分) + “分” + 到文本 (60 - 秒) + “秒”
.否则
时钟1.时钟周期 = 0
时钟2.时钟周期 = 1
秒 = 0
分 = 1
.如果结束
.子程序 _时钟2_周期事件
水平位置 = 取鼠标水平位置 ()
垂直位置 = 取鼠标垂直位置 ()
时钟2.时钟周期 = 0
时钟1.时钟周期 = 1000
页:
[1]