var
MyTextFile:TextFile;
s:string;
begin
AssignFile(MyTextFile,'MyTextFile.txt');
reset(MyTextFile);
{文件读取}
CloseFile(MyTextFile);
end;如何在文件读取过程中直接读第十行的字符串!不调用十次readln(MyTextFile,s);
MyTextFile:TextFile;
s:string;
begin
AssignFile(MyTextFile,'MyTextFile.txt');
reset(MyTextFile);
{文件读取}
CloseFile(MyTextFile);
end;如何在文件读取过程中直接读第十行的字符串!不调用十次readln(MyTextFile,s);
Lines := TStringList.Create;
Lines.LoadFromFile(MyFileName);
S := Lines[9];
...