基本是這樣的，我現在想要讀取TXT檔案當中的資料，比如說一共四列，第一列我想單獨讀取，后三列再讀取要進行后續的計算，請問該如何編代碼啊？？
uj5u.com熱心網友回復：
OpenDialog1.InitialDir := Path;OpenDialog1.Filter := 'Text Files(*.txt)|*.txt|All Files(*.*)|*.*';
if OpenDialog1.Execute then
Path1 := OpenDialog1.FileName
else
begin
Path1 := '';
exit;
end;
AssignFile(Fname, Path1);
Reset(Fname);
j := 0;
while (not Eof(Fname)) And (j < PN) do
begin
For i:=0 to 0 do
Read(Fname,depthaa[j][i]);
showmessage('tongguo');
For i := 1 To NdNum[0] Do
Read(Fname, xp[j][i]);
這是一部分代碼
uj5u.com熱心網友回復：
可以建立一個stringlist的變數，將txt檔案加載后，回圈取出4行資料保存到臨時資料庫中。uj5u.com熱心網友回復：
同意樓上。用TStringList最方便，一行中四列的值可以用下標的形式體現，如MysList[0]，是字串型別，然后你再進行型別轉換再進行相應計算，這樣前提是如果是同一行資料進行計算的情況。
如果跨行資料進行計算，如對某列求和，可以回圈處理。
再如果跨行多列進行復雜的計算，最好還是回圈一遍處理到表中，然后用資料庫的方式來做
不知道你想要做什么，所以各種情況都給你說了
轉載請註明出處，本文鏈接：https://www.uj5u.com/houduan/77552.html
標籤：語言基礎/算法/系統設計
上一篇：Min_25篩
下一篇：關于 DP 的一些內容