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

解决方案 »

  1.   

    ...
      Lines := TStringList.Create;
      Lines.LoadFromFile(MyFileName);
      S := Lines[9];
    ...
      

  2.   

    文本文件不能定位。可以将文件读到一个StringList中(StringList.LoadFromFile()),用StringList[9]来取第十行
      

  3.   

    真的不能定位吗?我是不想太消耗资源才这么做的!我的文本文件很大!如果放进StringList中很消耗资源的。
      

  4.   

    如果是很大的话。就在循环用Readln方法可能还要好一些