全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1024
推到 Plurk!
推到 Facebook!

請問有關txt檔讀出的問題

答題得分者是:RaynorPao
vy1104
一般會員


發表:2
回覆:1
積分:0
註冊:2003-07-28

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-07-28 01:11:41 IP:61.231.xxx.xxx 未訂閱
請問: 想把文字檔內的資料一筆一筆的讀出,放於各個EDIT中,該如何寫會比較方便?    EXT: 文字檔 text.txt 內容如下:        DataString        parameter_name[空白] parameter_value P1 [空白][空白][空白] 123 P2 [空白][空白][空白] 23 P3 [空白][空白][空白] 3456 P4 [空白][空白][空白] 45678 要分別用4 個EDIT把parameter_value 秀出來 但是第一、二行和4個parameter_name都不必讀出來
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-07-28 08:49:46 IP:203.73.xxx.xxx 未訂閱
引言: 請問: 想把文字檔內的資料一筆一筆的讀出,放於各個EDIT中,該如何寫會比較方便? EXT: 文字檔 text.txt 內容如下: DataString parameter_name[空白] parameter_value P1 [空白][空白][空白] 123 P2 [空白][空白][空白] 23 P3 [空白][空白][空白] 3456 P4 [空白][空白][空白] 45678 要分別用4 個EDIT把parameter_value 秀出來 但是第一、二行和4個parameter_name都不必讀出來
vy1104 你好: 請參考以下的範例程式碼 < class="code"> void __fastcall TForm1::Button4Click(TObject *Sender) { TStringList *sl=new TStringList; sl->LoadFromFile("text.txt"); for(int i=0; iCount; i ) { if(i==0 || i==1) continue; int j=sl->Strings[i].Length(); int k=j; while(k>0) { if(sl->Strings[i].SubString(k, 1)==" ") { switch(i) { case 2: Edit1->Text=sl->Strings[i].SubString(k 1, j-k); break; case 3: Edit2->Text=sl->Strings[i].SubString(k 1, j-k); break; case 4: Edit3->Text=sl->Strings[i].SubString(k 1, j-k); break; case 5: Edit4->Text=sl->Strings[i].SubString(k 1, j-k); break; default: break; } k=0; } k--; } } delete sl; } -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
vy1104
一般會員


發表:2
回覆:1
積分:0
註冊:2003-07-28

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-29 17:28:31 IP:61.231.xxx.xxx 未訂閱
謝謝RaynorPao! 我參考您的方法解決了我的問題了! 謝謝!
gofome
一般會員


發表:23
回覆:9
積分:6
註冊:2003-05-14

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-07-30 16:22:43 IP:61.221.xxx.xxx 未訂閱
請問一下讀進來的資料如 A150.0 B100.5 C50.7 A25.3 B50.7 C75.9 可不可以將每筆資料A,B,C及後面的值分別用三種頻色區分呢 如A150.0為藍色,B100.5藍色,50.7為綠色呢 把資料show在ListBox或Memo或RichEdit裡 發表作品區裡有人發表" TRichEdit 讀出 "TXT" 的文字檔,能顯示文字是多種彩色的"但是用Delphi所寫,小弟只知其中意思,想要嚐試改為BCB結果失敗, 所以請教各位如何改變讀進來的資料呢? 謝謝
系統時間:2024-05-18 4:29:52
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!