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

readfile列讀取

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


發表:42
回覆:42
積分:21
註冊:2003-10-18

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-04 09:57:19 IP:210.59.xxx.xxx 未訂閱
hfile=CreateFile("C:\\ti\\myprojects\\tt1\\chen.txt",GENERIC_READ,0,NULL,OPEN_ALWAYS,FILE_FLAG_SEQUENTIAL_SCAN,NULL);
ReadFile(hfile,buf,sizeof(buf),&bytesread,NULL) 
buf不是要設為陣列的模式那該如讀取例如 30 20 40 50 60 txt檔案內的數值 因為之前我把他設為TStringList* buf = new TStringList();不行 for (int x=0; x<10; x ) { i=s[x]; Series1->AddXY(i,buf->Strings[x].ToInt(),i,clRed); } delete buf;
RaynorPao
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-04 10:11:24 IP:203.73.xxx.xxx 未訂閱
引言:
hfile=CreateFile("C:\\ti\\myprojects\\tt1\\chen.txt",GENERIC_READ,0,NULL,OPEN_ALWAYS,FILE_FLAG_SEQUENTIAL_SCAN,NULL);
ReadFile(hfile,buf,sizeof(buf),&bytesread,NULL) 
buf不是要設為陣列的模式那該如讀取例如 30 20 40 50 60 txt檔案內的數值 因為之前我把他設為TStringList* buf = new TStringList();不行 for (int x=0; x<10; x++) { i=s[x]; Series1->AddXY(i,buf->Strings[x].ToInt(),i,clRed); } delete buf;
leonard 你好: 如果你要讀取的檔案是純文字檔案的話,用 TStringList 就可以了 < class="code"> int j=0; TStringList *sl=new TStringList; sl->LoadFromFile("C:\\test.txt"); for(int i=0; iCount; i++) { if(Trim(sl->Strings[i])!="") { ShowMessage(sl->Strings[i]); j=StrToInt(sl->Strings[i]); // 轉成整數 } } delete sl; -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
leonard
一般會員


發表:42
回覆:42
積分:21
註冊:2003-10-18

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-04 11:32:53 IP:210.59.xxx.xxx 未訂閱
因為在這之前我要先判斷這檔案是否有被別的程式使用 所以我才使用 hfile=CreateFile("C:\\ti\\myprojects\\tt1\\chen.txt",GENERIC_READ,0,NULL,OPEN_ALWAYS,FILE_FLAG_SEQUENTIAL_SCAN,NULL); 謝謝版主喔
ives
一般會員


發表:1
回覆:4
積分:1
註冊:2003-12-30

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-05-15 22:54:11 IP:61.30.xxx.xxx 未訂閱
引言:
引言:
hfile=CreateFile("C:\\ti\\myprojects\\tt1\\chen.txt",GENERIC_READ,0,NULL,OPEN_ALWAYS,FILE_FLAG_SEQUENTIAL_SCAN,NULL);
ReadFile(hfile,buf,sizeof(buf),&bytesread,NULL) 
buf不是要設為陣列的模式那該如讀取例如 30 20 40 50 60 txt檔案內的數值 因為之前我把他設為TStringList* buf = new TStringList();不行 for (int x=0; x<10; x++) { i=s[x]; Series1->AddXY(i,buf->Strings[x].ToInt(),i,clRed); } delete buf;
leonard 你好: 如果你要讀取的檔案是純文字檔案的話,用 TStringList 就可以了 < class="code"> int j=0; TStringList *sl=new TStringList; sl->LoadFromFile("C:\\test.txt"); for(int i=0; iCount; i++) { if(Trim(sl->Strings[i])!="") { ShowMessage(sl->Strings[i]); j=StrToInt(sl->Strings[i]); // 轉成整數 } } delete sl; -- Enjoy Researching & Developing --
我現在遇到一個問題! 因為我要讀的檔案中的第一行有hex code 的資料長度,他可能會跟檔尾 X"1a" 相同,而導致於readln 會誤判 ,有什麼讀法可以解決嗎?
系統時間:2024-05-03 9:50:42
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!