線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1314
推到 Plurk!
推到 Facebook!

how to read

答題得分者是:wameng
小丫123
初階會員


發表:85
回覆:62
積分:29
註冊:2004-08-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-09-23 09:32:14 IP:218.64.xxx.xxx 未訂閱
请教各位: 现在我在 study.txt 里存了一组数据,我想把它读出来如下 x[1]=1 x[2]=2 .. 我该怎样写程序啊??谢谢!!
wameng
版主


發表:31
回覆:1336
積分:1183
註冊:2004-09-16

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-09-23 10:28:27 IP:61.222.xxx.xxx 未訂閱
數據量小的話直接使用 TstringList var i:integer; Filestr : TstringList; begin Filestr := TstringList.Create; try Filestr.loadfromFile('study.txt'); {FileStr.count 表示讀出來的數據有幾條 } if FileStr.Count>0 then for I:=0 to FileStr.Count-1 do begin { 讀取每一條的數據 } Showmessage(FileStr[I]); end; finally Filestr.free; end; end;
小丫123
初階會員


發表:85
回覆:62
積分:29
註冊:2004-08-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-09-23 21:32:05 IP:218.64.xxx.xxx 未訂閱
非常感谢wameng 的指导。
系統時間:2017-10-23 21:30:29
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!