TC官方合作论坛

 找回密码
 立即注册
查看: 3484|回复: 13

[源码分享] 菜鸟制作的定时关机小工具 出炉了! 大家多多指教哈!

[复制链接]
发表于 2012-5-19 17:32:58 | 显示全部楼层 |阅读模式
思路:
1、可以输入小时和分钟
2、点击开始按钮注册定时器
3、定时器事件中添加代码
     3-1、分别获取编辑框中的小时,与分钟值;在获取系统时间,把系统时间分割获取小时和分钟
     3-2、比较设置的时间和系统时间,如果小时分钟都相等了,就执行关机。
  1. 空间 定时关机
  2. //定义默认空间


  3. 字符型 小时,分钟

  4. 功能 逻辑型 开始_点击()  
  5.         小时=编辑框.获得文本("编辑框小时")
  6.         分钟=编辑框.获得文本("编辑框分钟")   
  7.         如果(小时=="" || 分钟=="")
  8.                 辅助.消息框("请输入时间")
  9.         否则
  10.                 定时器.注册("定时器0",1000)   
  11.         如果结束
  12. 返回 真
  13. //函数返回语句
  14. 功能结束



  15. 功能 逻辑型 退出_点击()
  16.         辅助.退出()
  17.         返回 真
  18. 功能结束



  19. 功能 逻辑型 定时器0_时钟()

  20. //        字符型 小时=编辑框.获得文本("编辑框小时")  
  21. //        字符型 分钟=编辑框.获得文本("编辑框分钟")  
  22.              
  23.      字符型 当前时间=系统.时间(1)  
  24.      字符型[] 当前时间数组=字符型[7]
  25.      字符串.分割(当前时间,"|",当前时间数组)  
  26.      
  27.      如果(小时==当前时间数组[0] && 分钟==当前时间数组[1] )  
  28.             定时器.销毁("定时器0")   
  29.             //系统.关机(10)  //要真关机,就把这里的注释去掉
  30.             辅助.消息框("到了设定时间:"+小时+" 时 "+分钟+ " 分")    //这里做测试用的,不真滴关机了!
  31.      如果结束

  32. 返回 真
  33. 功能结束



  34. 功能 逻辑型 最小化到托盘_点击()
  35.         辅助.设置托盘("定时关机",假)
  36. 返回 真
  37. 功能结束


  38. 空间结束
  39. //空间结束语句
复制代码





本帖子中包含更多资源

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

x
回复

使用道具 举报

发表于 2012-5-19 17:44:37 | 显示全部楼层
谢谢楼主的分享
回复 支持 反对

使用道具 举报

泥巴路 该用户已被删除
发表于 2012-5-19 17:57:41 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复 支持 反对

使用道具 举报

发表于 2012-5-19 18:15:20 | 显示全部楼层
每一步的进步都值得鼓励,加油
回复 支持 反对

使用道具 举报

发表于 2012-5-20 01:28:37 | 显示全部楼层
代码貌似没有发完吧
回复 支持 反对

使用道具 举报

发表于 2012-5-20 13:43:22 | 显示全部楼层
学习  下
回复 支持 反对

使用道具 举报

发表于 2012-5-20 18:36:14 | 显示全部楼层
这个代码不完整啊
回复 支持 反对

使用道具 举报

 楼主| 发表于 2012-5-21 09:56:27 | 显示全部楼层
回复 7楼wjxxxun的帖子

呵呵!马上上来!
回复 支持 反对

使用道具 举报

发表于 2012-5-21 16:08:07 | 显示全部楼层
给力的说, 支持下。。
回复 支持 反对

使用道具 举报

发表于 2012-5-21 18:26:53 | 显示全部楼层
亲给你个建议用线程  用定时器,有时候会造成界面假死- -
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关闭

推荐上一条 /2 下一条

关闭

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

GMT+8, 2024-5-13 15:19 , Processed in 0.048287 second(s), 24 queries .

Powered by 海安简单软件服务部

© 2008-2019 版权所有 保留所有权利

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