程序功能
图1界面上半部分用于即时显示当前系统的日期和时间信息,下半部分用于设置自动关机的日期和时间。当系统时间和设置的关机时间吻合(相等)并且“自动关机生效”被选中时,计算机将自动关闭。其中,只有当所设定的关机时间在有效范围内时(即大于系统时间),“自动关机生效”才能被激活。
组件设置
向窗体上放置两个tgroupbox组件:groupbox1和groupbox2,其caption属性分别设置为“当前系统时间”和“预设关机时间”。在这两个组件上再放置4个tdatetimepicker组件:datetimepicker1、datetimepicker2和datetimepicker3、datetimepicker4,其中前两个分别用于显示当前系统的日期和时间,后两个用于设置自动关机的日期和时间,它们的部分属性值设置如下表所示:
在窗体上放置一个tcheckbox组件:checkbox1(其caption属性设置为“自动关机生效”)和一个ttimer组件:timer1(其interval属性取缺省值1000)。
代码编写
在窗体的oncreate事件过程中编写如下代码:
void __fastcall tform1::formcreate(tobject *sender) { checkbox1->checked=false; //初始设置为不可访问 checkbox1->enabled=false; datetimepicker4->datetime=now(); datetimepicker3->datetime=now(); datetimepicker2->datetime=now(); //用系统时间初始化组件 datetimepicker1->datetime=now(); } 在组件timer1的ontimer事件过程中编写如下代码: void __fastcall tform1::timer1timer(tobject *sender) { datetimepicker2->datetime=now(); //接收当前日期和时间,用于即时显示 datetimepicker1->datetime=now(); //随时检测设定的关机日期和时间是否有效 if(datetimepicker4->datetime < now()) { checkbox1->checked=false; //无效时不可访问 checkbox1->enabled=false; } else checkbox1->enabled=true; //有效时可以访问 if(checkbox1->checked == true && datetimetostr(datetimepicker4->datetime) == datetimetostr(now())) {//判断定时关机条件是否满足 dword tmp; //调用win api函数关闭计算机 exitwindowsex(ewx_shutdown,tmp); } } |
欢迎访问最专业的网吧论坛,无盘论坛,网吧经营,网咖管理,网吧专业论坛
https://bbs.txwb.com
关注天下网吧微信/下载天下网吧APP/天下网吧小程序,一起来超精彩
|
本文来源:来自网络 作者:佚名