[返回]
计算机世界2001年第20期
用C++Builder 编写定时关机程序
辽宁大学 郑永凡
从Internet下载较大的软件时,由于目前网络带宽的原因,许多人喜欢在晚间进行,而到深夜时就存在人需要休息的问题。目前绝大多数下载软件可以估算出下载所需的时间,如果到时让计算机自动关机,就可以免受守候之苦。本文介绍笔者用C++ Builder 5编写的一个能实现定时自动关机的程序。
程序功能
程序的运行界面如图1所示:
图 1
图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);
}
}
组件DateTimePicker3和DateTimePicker4的OnChange事件过程的代码相类似,为使这两个组件所设置的日期和时间“联动”(同时变化),组件DateTimePicker3的OnChange代码设置如下:
void __fastcall TForm1::DateTimePicker3Change(TObject *Sender)
{//组件变化“联动”
DateTimePicker4->DateTime=DateTimePicker3->DateTime;
//检测设置的日期是否有效
if(DateTimePicker4->DateTime < Now())
{
CheckBox1->Checked=false;
CheckBox1->Enabled=false;
}
else
CheckBox1->Enabled=true;
}
组件DateTimePicker4的OnChange代码设置如下:
void __fastcall TForm1::DateTimePicker4Change(TObject *Sender)
{//组件变化“联动”
DateTimePicker3->DateTime=DateTimePicker4->DateTime;
//检测设置的时间是否有效
if(DateTimePicker3->DateTime < Now())
{
CheckBox1->Checked=false;
CheckBox1->Enabled=false;
}
else
CheckBox1->Enabled=true;
}
另外,如果在Timer1组件的OnTimer事件过程中添加如下代码:
//定义日期时间型对象(变量)
TDateTime presetDateTime,currentDateTime;
presetDateTime=DateTimePicker3->DateTime;
currentDateTime=Now();
//得到时间差(秒数)
Edit1->Text=int((presetDateTime.Val-currentDateTime.Val)*60*60*24);
则可以通过在窗体上放置的TEdit组件Edit1即时显示距离关机所剩余的秒数,实现倒计时。