我现在在 study.txt存了一些数据,请问怎样我才能将这些数据读到inData[i][j]中, 在 for i:= 0 to N-1 do      for j:=0 to M-1 do          indata[i][j]:=k;    前应该加什么语句！  怎样将这些indata[i][j],数据存到study.txt中呢? 拜托各位了

Study.txt 的數據，可以用 TstringList 開啟並讀出來 procedure Read; var FileStrs :TstringList; I:integer; begin FileStrs:=TstringList.create; Try FileStrs.LoadfromFile('Study.txt'); if FileStrs.Count>0 then begin { 有數據 讀出來 } For I:=0 to FileStrs.Count-1 do FileStrs:= indata[i][j] ......... end; finally FileStrs.Free; end; end; 我不曉得你為什麼要用二維動態數組 儲存也很簡單 FileStr.savetoFile('Study.txt'); 如果數據太龐大可能就要用開啟檔案的方式 Readln Writeln 發表人 - wameng 於 2004/09/16 20:44:36