本帖最后由 小人国历险记 于 2015-10-20 19:04 编辑
倒计时.zip
(1.93 KB, 下载次数: 35)
[C++] 纯文本查看 复制代码 .版本 2
.程序集 窗口程序集_启动窗口
.程序集变量 time, 整数型
.程序集变量 countdown, 整数型
.子程序 __启动窗口_创建完毕
config ()
.子程序 config
.局部变量 n, 整数型
组合框1.加入项目 (“00分钟”, )
组合框2.加入项目 (“00”, )
组合框3.加入项目 (“00”, )
组合框4.加入项目 (“00”, )
.计次循环首 (60, n)
组合框1.加入项目 (到文本 (n) + “分钟”, )
组合框3.加入项目 (到文本 (n), )
组合框4.加入项目 (到文本 (n), )
.计次循环尾 ()
.计次循环首 (24, n)
组合框2.加入项目 (到文本 (n), )
.计次循环尾 ()
组合框1.现行选中项 = 0
组合框2.现行选中项 = 0
组合框3.现行选中项 = 0
组合框4.现行选中项 = 0
.子程序 _按钮1_被单击
.如果 (时钟1.时钟周期 = 1000)
按钮1.标题 = “start”
时钟1.时钟周期 = 0
.否则
按钮1.标题 = “stop”
time = 计算秒 ()
时钟1.时钟周期 = 1000
.如果结束
.子程序 计算秒, 整数型
.局部变量 m, 整数型
.如果 (选择框1.选中 = 假)
m = 60 × 组合框1.现行选中项
.否则
m = 60 × 组合框2.现行选中项 × 60 + 60 × 组合框3.现行选中项 + 组合框4.现行选中项
.如果结束
返回 (m)
.子程序 _时钟1_周期事件
countdown = countdown + 1
oltime.标题 = 到文本 (time - countdown) + “秒”
.如果真 (time ≤ countdown)
时钟1.时钟周期 = 0
信息框 (“计时完成”, 0, , )
countdown = 0
.如果真结束
|