在DELPHI中如何读取一TXT文件的一指定行文本

 我来答
lovesky0414
推荐于2017-11-25 · TA获得超过3353个赞
知道大有可为答主
回答量:1610
采纳率:66%
帮助的人:1577万
展开全部
用StringList
var
sl: TStringList;

sl := TStringList.create;
sl.loadfromfile('txt文件路径');
sl[行号];// 这就是指定行的内容
sl.free;
追问
这样不符合要求,我要求在读取过程中不显示在界面上
追答
stringlist 没有界面啊  纯后台操作
本回答被提问者和网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
hys0510
2013-01-02
知道答主
回答量:1
采纳率:0%
帮助的人:1539
展开全部
用Memo组件
1、打开文文本:Memo1.Lines.LoadFromFile();
2、访问某一行内容,比如取出Memo1组件第5行的内容,把它显示在Form1的标题上:
Form1.Caption := Memo1.Lines.Strings[4];
追问
这是显示在组件Memo1中后,取第5行,我是想不经过窗体中的一显示控件,就取得第五行,如先读到数组中等,或直接读出第5行
追答
可以用AssignFile,
比如读d盘下1.txt文本中第6行的文本内容

{$APPTYPE CONSOLE}
var
i: Integer;
S: string;
F: TextFile;

begin
AssignFile(F, 'd:\1.txt');
Reset(F);
for i := 1 to 6 do
Readln(F, S);
Writeln(S);
Readln;
end.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式