教你如何使用 C++Builder 制作鬧鐘_.net

教你如何使用 C++Builder 制作鬧鐘

發表于：2007-05-26來源：作者：點擊數：標簽：

大凡熱戀中的網蟲都曾經陷入下列的困境：約好女/男朋友晚七點半在老地方等，卻在計算機面前一直爬行到深夜，等反映過來，朋友早已拂塵而去，又得幾天的功夫去陪禮道歉。朋友何不按以下步驟做一簡單的鬧鐘，讓你安安心心上網，大大方方約會。你只要在上網的時

大凡熱戀中的網蟲都曾經陷入下列的困境：約好女/男朋友晚七點半在老地方等，卻在計算機面前一直爬行到深夜，等反映過來，朋友早已拂塵而去，又得幾天的功夫去陪禮道歉。朋友何不按以下步驟做一簡單的鬧鐘，讓你安安心心上網，大大方方約會。你只要在上網的時候打開此應用程序，設置好約會時間（當然也可以是默認好的）即可。時間一到，音樂響起，快去約會吧。

本鬧鐘程序有以下組件組成：

序號    組件類型         組件名稱             功能
            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

評論列表（網友評論僅供網友表達個人看法，并不表明本站同意其觀點或證實其描述）

軟件測試 > 測試開發技術 > 軟件測試開發語言 > .net >