易语言定时关机源码

易语言定时关机源码 .版本 2 .支持库 shell .程序集 窗口程序集1 .程序集变量 光标位置, 文本型 .子程序 _编辑框1_获得焦点 光标位置 , “1” .子程序 _编辑框2_获得焦点 光标位置 , “2” .子程序 _编辑框3_获得焦点 光标位置 , “3” .子程序 _调节器1_调节钮被按下 .参数 按钮值, 整数型 .判断开始 (光标位置 , “1”) 编辑框1.内容 ,到文本 (到数值 (编辑框1.内容) ， 按钮值) .如果真 (编辑框1.内容 , “24”) 编辑框1.内容 , “0” .如果真结束 .如果真 (编辑框1.内容 , “-1”) 编辑框1.内容 , “23” .如果真结束 .判断 (光标位置 , “2”) 编辑框2.内容 ,到文本 (到数值 (编辑框2.内容) ， 按钮值) .如果真 (编辑框2.内容 , “60”) 编辑框2.内容 , “0” .如果真结束 .如果真 (编辑框2.内容 , “-1”) 编辑框2.内容 , “59” .如果真结束 .判断 (光标位置 , “3”) 编辑框3.内容 ,到文本 (到数值 (编辑框3.内容) ， 按钮值) .如果真 (编辑框3.内容 , “60”) 编辑框3.内容 , “0” .如果真结束 .如果真 (编辑框3.内容 , “-1”) 编辑框3.内容 , “59” .如果真结束 .默认 .判断结束 ' 信息框 (“请调整你的关机时间”, 0, ) .子程序 __启动窗口_创建完毕 编辑框1.内容 , 到文本 (取小时 (增减时间 (取现行时间 (), #分钟, 10))) 编辑框2.内容 , 到文本 (取分钟 (增减时间 (取现行时间 (), #分钟, 10))) 编辑框3.内容 , 到文本 (取秒 (增减时间 (取现行时间 (), #分钟, 10))) 日期框1.今天 , 增减时间 (取现行时间 (), #分钟, 10) 时钟1.时钟周期 , 1000 .子程序 _时钟1_周期事件 .判断开始 (取现行时间 () , 到时间 (到文本 (取年份 (日期框1.今天)) ， “年” ， 到文本 (取月份 (日期框1.今天)) ， “月” ， 到文本 (取日 (日期框1.今天)) ， “日” ， 编辑框1.内容 ， “时” ，编辑框2.内容 ， “分” ， 编辑框3.内容 ， “秒”)) 信息框 (“你的电脑已开始关机”, 0, ) 信息框 (“感谢人的使用”, 0, ) .默认 .判断结束 .如果真 (取现行时间 () , 到时间 (到文本 (取年份 (日期框1.今天)) ， “年” ， 到文本 (取月份 (日期框1.今天)) ， “月” ， 到文本 (取日 (日期框1.今天)) ， “日” ， 编辑框1.内容 ， “时” ，编辑框2.内容 ， “分” ， 编辑框3.内容 ， “秒”)) 关闭系统 (#关机, 真) .如果真结束 编辑框4.内容 , 到文本 (取小时 (取现行时间 ())) ， “时” ， 到文本 (取分钟 (取现行时间 ())) ， “分” ， 到文本 (取秒 (取现行时间 ())) ， “秒” .子程序 _按钮1_被单击 关闭系统 (#关机, 真) 信息框 (“你现在已关机～”, 0, ) .子程序 _按钮2_被单击 结束 () 关闭系统 (1, 真) ' 1: #关机; 2: #重启; 3: #注销; 4: #休眠 5: #冬眠