如何讀入時間格式的字串,並進行運算 |
尚未結案
|
心的停機坪
一般會員 發表:31 回覆:41 積分:14 註冊:2003-07-14 發送簡訊給我 |
|
無故障
一般會員 發表:17 回覆:69 積分:17 註冊:2004-03-11 發送簡訊給我 |
可以參考網站內 "讀檔問題" http://delphi.ktop.com.tw/topic.php?TOPIC_ID=50731 練習!
練習!
再練習!
------
嘿嘿嘿 |
anpino
版主 發表:31 回覆:477 積分:231 註冊:2003-01-02 發送簡訊給我 |
心的停機坪 您好,
看看下面這個code:
我在form上各放一個memo,button與label.
void __fastcall TForm1::Button1Click(TObject *Sender) { String strGetTime1,strGetTime2; TDateTime dtTime1,dtTime2; TStringList *strGetLine = new TStringList(); Memo1->Lines->Add("07:01:17 6 0.62"); // 讀進一串字 Memo1->Lines->Add("07:02:32 9 0.34"); strGetLine->Delimiter = ' '; // 以空白字元做區隔 // 取得第一行的時間字串 strGetLine->DelimitedText = Memo1->Lines->operator [](0); strGetTime1 = strGetLine->Strings[0]; // 取得第二行的時間字串 strGetLine->DelimitedText = Memo1->Lines->operator [](1); strGetTime2 = strGetLine->Strings[0]; LongTimeFormat = "hh:nn:ss"; // 設定時間格式 dtTime1 = StrToTime(strGetTime1); dtTime2 = StrToTime(strGetTime2); Label1->Caption = "Time Deff = " TimeToStr(dtTime1-dtTime2); }------------------------------- 數學系是內功很強(邏輯/分析) 資工系是招式很多(程式技巧) 就像令狐沖VS東方不敗:D Anpinos Middle Earth http://anpino.hp.infoseek.co.jp/ ------------------------------- |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |