各位好,小弟因為不知道是否有"計時器"這個元件 我只在System元件盤裡找到Timer這元件. 但是使用後,它似乎只會抓取本機的日期、時間. 試了很多方法,好像沒辦法做出像計時器,可以從0開始計數的. 另外,小弟去搜尋站內的資料,是有找到一篇關於"計時器"的文章 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=37344 不過除了自行建構一個計時器元件外,還有什麼更簡單的方法嗎? 可能是小弟功力尚淺,勿怪小弟孤陋寡聞. 希望知道的朋友可以幫小弟這個小忙... 提供一個方向給小弟... 感激不盡! 發表人 -

------
-----------------------
請多多指教啦!!^^

引言: 各位好,小弟因為不知道是否有"計時器"這個元件 我只在System元件盤裡找到Timer這元件. 但是使用後,它似乎只會抓取本機的日期、時間. 試了很多方法,好像沒辦法做出像計時器,可以從0開始計數的. 另外,小弟去搜尋站內的資料,是有找到一篇關於"計時器"的文章 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=37344 不過除了自行建構一個計時器元件外,還有什麼更簡單的方法嗎? 可能是小弟功力尚淺,勿怪小弟孤陋寡聞. 希望知道的朋友可以幫小弟這個小忙... 提供一個方向給小弟... 感激不盡! < face="Verdana, Arial, Helvetica"> kj68215 你好: 請問？你所說的從 0 開始計數是什麼意思呢？

int gi;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
   gi=0;
   Timer1->Interval=1000;
   Timer1->Enabled=true;
}
void __fastcall TForm1::Button2Click(TObject *Sender)
{
   Timer1->Enabled=false;
}
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   Edit1->Text=IntToStr(++gi);
}

-- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2004/04/20 08:45:10

包大人,您好! 首先感謝您多次的幫忙小弟,並解開很多小弟心中的疑惑! 至於說<>>這句話,小弟的確是講得滿籠統的,不是很清楚! 其實就是從 > ----------------------- 請多多指教啦!!^^

------
-----------------------
請多多指教啦!!^^

kj68215 您好：    小弟有一淺見，就是自己寫比較快一些 < > 通常這樣比較能符合自己的需求，包含介面美觀的設計 而製作 「 時 : 分 : 秒 」 的格式的程式也挺簡單的 祝順心 < >

引言: 包大人,您好! 首先感謝您多次的幫忙小弟,並解開很多小弟心中的疑惑! 至於說<>>這句話,小弟的確是講得滿籠統的,不是很清楚! 其實就是從 > ----------------------- 請多多指教啦!!^^ < face="Verdana, Arial, Helvetica"> kj68215您好:

也許您可以用GetTickCount API    http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/gettickcount.asp    WORD LastStart;   // Time at which the last synchronisation started
WORD LastDestion = 0;   // Number of milliseconds since the last execution
LastStart = GetTickCount(); 
          |
          | 做您想做的事...(經過)
          |
       
LastDestion = GetTickCount() - LastStart;

LastDestion 就是經過的時間.... < class="code">/*生活是一種藝術,用心生活享受生活*/ 發表人 - axsoft 於 2004/04/20 19:13:53

引言: 包大人,您好! 首先感謝您多次的幫忙小弟,並解開很多小弟心中的疑惑! 至於說<>>這句話,小弟的確是講得滿籠統的,不是很清楚! 其實就是從 > ----------------------- 請多多指教啦!!^^ < face="Verdana, Arial, Helvetica"> kj68215您好： 請參考以下的程式碼，視需求自行修改

TDate StartTime,LastTime;  //宣告成全域
//----------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
   StartTime = Now();      //記錄開始時間
}
//----------------------------------------------
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
   AnsiString strTime;
   LastTime = Now() - StartTime;
   //int days = int(Now() - StartTime); //<-這種方法可以得到經過多少天
   Caption = strTime.sprintf("%s",LastTime.FormatString("hh:nn:ss"));
}

天長地久有時盡，追求知識無絕期！

真糟糕,每個方法都對耶! 那該怎麼給分呢?? 好難 ----------------------- 請多多指教啦!!^^

------
-----------------------
請多多指教啦!!^^