txt文件操作的问题！！！

Question

我有一个txt文件，有10行，我想随即取出某一行得内容怎么做？我是新手，大家帮忙！

Answer 1

stringlist:=TStringlist.create;
stringlist.loadfromfile('path name')
stringlist[i]就是第i行的内容

Answer 2

Var
stringlist:Tstringlist;
ST:string;//你所要的内容
i:integer;//你所要的行号
begin
stringlist.create(nil);
stringlist.loadfromfile('text.txt');
ST:=stringlist(i);
end;

Answer 3

to:hkbarton(宁静至远||淡泊明志) 
为什么报这个错，什么意思？
[Error] MainForm.pas(40): Undeclared identifier: 'Stringlist'