教你如何使用 C++Builder 制作鬧鐘
大凡熱戀中的網蟲都曾經陷入下列的困境：約好女/男朋友晚七點半在老地方等，卻在計算機面前一直爬行到深夜，等反映過來，朋友早已拂塵而去，又得幾天的功夫去陪禮道歉。朋友何不按以下步驟做一簡單的鬧鐘，讓你安安心心上網，大大方方約會。你只要在上網的時
大凡熱戀中的網蟲都曾經陷入下列的困境：約好女/男朋友晚七點半在老地方等，卻在計算機面前一直爬行到深夜，等反映過來，朋友早已拂塵而去，又得幾天的功夫去陪禮道歉。朋友何不按以下步驟做一簡單的鬧鐘，讓你安安心心上網，大大方方約會。你只要在上網的時候打開此應用程序，設置好約會時間（當然也可以是默認好的）即可。時間一到，音樂響起，快去約會吧。
本鬧鐘程序有以下組件組成：
序號 組件類型 組件名稱 功能
1 Tlabel l_Clock_1 顯示“輸入日期”
2 TdateTimePicker dtp_Clock_1 選擇日期
3 Tlabel l_Clock_2 顯示“輸入時間”
4 TdateTimePacker tdp_Clock_2 選擇時間
5 TmediaPlayer mp_Clock 演奏音樂
6 Tbutton b_Clock_Open 重新打開
7 Ttimer t_Clock 定時檢測
8 Tbutton b_Clock_Close 關閉應用程序
|
屏幕組件一覽表
屏幕組件一覽圖
說明：dtp_Clock_1 的Kind屬性設置為dtkDate ， dtp_Clock_2 的Kind屬性設置為dtkTime，mp_Clock 的FileName屬性設置為你主機上存在的任何mid、wav、avi文件。t_Clock 的Interval屬性設置為10。
事件說明如下：
①、 t_Clock的OnTimer :
{
//按時觸發演示程序
struct date d;
struct time t;
AnsiString thour,tmin,tsec;
int dyear;
int dintyear;
int dmon,dday;
AnsiString tinthour,tintmin,tintsec;
AnsiString dintmon,dintday;
//取當天日期
getdate(&d);
dyear=d.da_year;
dday=d.da_day;
dmon=d.da_mon;
dintyear=StrToInt(dint.SubString(1,2));
dintmon=dint.SubString(4,2);
dintday=dint.SubString(7,2);
//取當時時間
gettime(&t);
thour=AnsiString(t.ti_hour);
tmin=AnsiString(t.ti_min);
//tsec=AnsiString(t.ti_sec);
//tint=AnsiString(DateTimePicker1- >Time);
tinthour=tint.SubString(10,2);
tintmin=tint.SubString(13,2);
//tintsec=tint.SubString(16,2);
//鬧鐘服務功能
if ((StrToInt(thour)==StrToInt(tinthour))&&
(StrToInt(tmin)==StrToInt(tintmin))
&&(StrToInt(AnsiString(dyear).SubString(3,2))
==dintyear)&&(StrToInt(dmon)==StrToInt(dintmon))
&&(StrToInt(dday)==StrToInt(dintday)))
{
dTimer- >Enabled=false;
MediaPlayer1- >Open();
MediaPlayer1- >Play();
}
}
②、 b_Clock_Open 的OnClick：
{
t_Clock- >Enabled=true;
}
③、 b_Clock_Close的OnClick
{
Application- >Terminate();
}
|
當然此程序還可以拓展、細化，如我僅將觸發條件檢測到分，當然它完全可以檢測到秒，也可以僅檢測到時。
原文轉自：http://www.kjueaiud.com
- 評論列表（網友評論僅供網友表達個人看法，并不表明本站同意其觀點或證實其描述）
-
老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月
| 
模板
教程
環境
性能
功能
管理
