用StringList
var
sl: TStringList;
sl := TStringList.create;
sl.loadfromfile('txt文件路径');
sl[行号];// 这就是指定行的内容
sl.free;
用Memo组件
1、打开文文本：Memo1.Lines.LoadFromFile();
2、访问某一行内容，比如取出Memo1组件第5行的内容，把它显示在Form1的标题上：
Form1.Caption := Memo1.Lines.Strings[4];
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024