delphi 如何读取文本文件中有指定字段的一行数据？
答案:3 悬赏:10 手机版
解决时间 2021-02-19 05:34
- 提问者网友：临风不自傲
- 2021-02-18 10:46
一个文本文件，有多行数据，需要查找头5个字是 56656 的那一行的所有数据。才学delphi不久，请不吝赐教！！感谢
最佳答案
- 五星知识达人网友：千杯敬自由
- 2021-02-18 11:32
st:TStringList;
st:=TStringList.create;
st.LoadfromFile('abc.txt');
.....
st:=TStringList.create;
st.LoadfromFile('abc.txt');
.....
全部回答
- 1楼网友：走死在岁月里
- 2021-02-18 12:45
turbo_pascal代码：
var
f:text;
st:string;
begin
assign(f,'test.txt');
reset(f);
while not eof(f) do readln(f,st);
close(f);
writeln(st);
end.
－－－－－－－－－－－－－－－－－－－－－－－－
delphi_pascal代码：
program project2;
{$apptype console}
uses
sysutils;
var
f:text;
st:string;
begin
assign(f,'test.txt');
reset(f);
while not eof(f) do readln(f,st);
close(f);
writeln(st);
readln;
end.
- 2楼网友：鸽屿
- 2021-02-18 11:42
readln读一行，然后判断这一行是否满足条件，不满足就读下一行
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯