如何删除文件中的文字  请给出代码 就删一个字  好像没有这样的函数啊
那如何用流来实现呢?
TFileStream

解决方案 »

  1.   

    如果文本文件的话,TStringlist更快些
      

  2.   

    那就简单了,用TStringList类的对象加载文件,在StringList中删除你要删除的字符,再存出去就可以了。
    StringList.Items[0];访问第一行的字符串
    StringList.Items[1];访问第二行的字符串
    ...
    StringList.Text就是把整个StringList连成一个字符串,你可以再处理之
    eg:var
      List: TStringList;
      i: Integer;
      S: string;
    begin
      List := TStringList.Create;
      try
        List.LoadFromFile('你的文本文件名');
        for i := 0 to List.Count - 1 do
        begin
          S := List.Strings[i];//取出第i行
          Delete(S, 1, 2);//删除前两个字符
          List.Strings[i] := S;//把改过的字符串再存入到List
        end;
        List.SaveToFile('你的文本文件名');//修改完成,再存入文件
      finally
        List.Free;
      end;
    end;
      

  3.   

    请问Tstringlist 和 Tstrings 有什么区别?