從internet下載較大的軟件時,由于目前網(wǎng)絡(luò)帶寬的原因,許多人喜歡在晚間進(jìn)行,而到深夜時就存在人需要休息的問題。目前絕大多數(shù)下載軟件可以估算出下載所需的時間,如果到時讓計算機(jī)自動關(guān)機(jī),就可以免受守候之苦。本文介紹筆者用c++ builder 5編寫的一個能實現(xiàn)定時自動關(guān)機(jī)的程序。
程序功能
圖1界面上半部分用于即時顯示當(dāng)前系統(tǒng)的日期和時間信息,下半部分用于設(shè)置自動關(guān)機(jī)的日期和時間。當(dāng)系統(tǒng)時間和設(shè)置的關(guān)機(jī)時間吻合(相等)并且“自動關(guān)機(jī)生效”被選中時,計算機(jī)將自動關(guān)閉。其中,只有當(dāng)所設(shè)定的關(guān)機(jī)時間在有效范圍內(nèi)時(即大于系統(tǒng)時間),“自動關(guān)機(jī)生效”才能被激活。
組件設(shè)置
向窗體上放置兩個tgroupbox組件:groupbox1和groupbox2,其caption屬性分別設(shè)置為“當(dāng)前系統(tǒng)時間”和“預(yù)設(shè)關(guān)機(jī)時間”。在這兩個組件上再放置4個tdatetimepicker組件:datetimepicker1、datetimepicker2和datetimepicker3、datetimepicker4,其中前兩個分別用于顯示當(dāng)前系統(tǒng)的日期和時間,后兩個用于設(shè)置自動關(guān)機(jī)的日期和時間,它們的部分屬性值設(shè)置如下表所示:
在窗體上放置一個tcheckbox組件:checkbox1(其caption屬性設(shè)置為“自動關(guān)機(jī)生效”)和一個ttimer組件:timer1(其interval屬性取缺省值1000)。
代碼編寫
在窗體的oncreate事件過程中編寫如下代碼:
void __fastcall tform1::formcreate(tobject *sender)
{
checkbox1->checked=false;
//初始設(shè)置為不可訪問
checkbox1->enabled=false;
datetimepicker4->datetime=now();
datetimepicker3->datetime=now();
datetimepicker2->datetime=now();
//用系統(tǒng)時間初始化組件
datetimepicker1->datetime=now();
}
在組件timer1的ontimer事件過程中編寫如下代碼:
void __fastcall tform1::timer1timer(tobject *sender)
{
datetimepicker2->datetime=now();
//接收當(dāng)前日期和時間,用于即時顯示
datetimepicker1->datetime=now();
//隨時檢測設(shè)定的關(guān)機(jī)日期和時間是否有效
if(datetimepicker4->datetime < now())
{
checkbox1->checked=false;
//無效時不可訪問
checkbox1->enabled=false;
}
else
checkbox1->enabled=true; //有效時可以訪問
if(checkbox1->checked == true && datetimetostr(datetimepicker4->datetime) == datetimetostr(now()))
{//判斷定時關(guān)機(jī)條件是否滿足
dword tmp;
//調(diào)用win api函數(shù)關(guān)閉計算機(jī)
exitwindowsex(ewx_shutdown,tmp);
}
}
程序功能
圖1界面上半部分用于即時顯示當(dāng)前系統(tǒng)的日期和時間信息,下半部分用于設(shè)置自動關(guān)機(jī)的日期和時間。當(dāng)系統(tǒng)時間和設(shè)置的關(guān)機(jī)時間吻合(相等)并且“自動關(guān)機(jī)生效”被選中時,計算機(jī)將自動關(guān)閉。其中,只有當(dāng)所設(shè)定的關(guān)機(jī)時間在有效范圍內(nèi)時(即大于系統(tǒng)時間),“自動關(guān)機(jī)生效”才能被激活。
組件設(shè)置
向窗體上放置兩個tgroupbox組件:groupbox1和groupbox2,其caption屬性分別設(shè)置為“當(dāng)前系統(tǒng)時間”和“預(yù)設(shè)關(guān)機(jī)時間”。在這兩個組件上再放置4個tdatetimepicker組件:datetimepicker1、datetimepicker2和datetimepicker3、datetimepicker4,其中前兩個分別用于顯示當(dāng)前系統(tǒng)的日期和時間,后兩個用于設(shè)置自動關(guān)機(jī)的日期和時間,它們的部分屬性值設(shè)置如下表所示:
在窗體上放置一個tcheckbox組件:checkbox1(其caption屬性設(shè)置為“自動關(guān)機(jī)生效”)和一個ttimer組件:timer1(其interval屬性取缺省值1000)。
代碼編寫
在窗體的oncreate事件過程中編寫如下代碼:
void __fastcall tform1::formcreate(tobject *sender)
{
checkbox1->checked=false;
//初始設(shè)置為不可訪問
checkbox1->enabled=false;
datetimepicker4->datetime=now();
datetimepicker3->datetime=now();
datetimepicker2->datetime=now();
//用系統(tǒng)時間初始化組件
datetimepicker1->datetime=now();
}
在組件timer1的ontimer事件過程中編寫如下代碼:
void __fastcall tform1::timer1timer(tobject *sender)
{
datetimepicker2->datetime=now();
//接收當(dāng)前日期和時間,用于即時顯示
datetimepicker1->datetime=now();
//隨時檢測設(shè)定的關(guān)機(jī)日期和時間是否有效
if(datetimepicker4->datetime < now())
{
checkbox1->checked=false;
//無效時不可訪問
checkbox1->enabled=false;
}
else
checkbox1->enabled=true; //有效時可以訪問
if(checkbox1->checked == true && datetimetostr(datetimepicker4->datetime) == datetimetostr(now()))
{//判斷定時關(guān)機(jī)條件是否滿足
dword tmp;
//調(diào)用win api函數(shù)關(guān)閉計算機(jī)
exitwindowsex(ewx_shutdown,tmp);
}
}

