如何删除TXT文件中一行记录？

Question

如何删除TXT文件中一行记录？
例如：
TXT中的内容如下：
AAAAAAAAAAAAAAAAAAAAAAAAA
BBBBBBBBBBBBBBBBBBBBBBBBB
CCCCCCCCCCCCCCCCCCCCCCCCCCCC
DDDDDDDDDDDDDDDDDDDD
FFFFFFFFFFFFFFFFFFFFF
EEEEEEEEEEEEEEEEEEEEE我想删除其中的第三行，使TXT中的内容变为：
AAAAAAAAAAAAAAAAAAAAAAAAA
BBBBBBBBBBBBBBBBBBBBBBBBB
DDDDDDDDDDDDDDDDDDDD
FFFFFFFFFFFFFFFFFFFFF
EEEEEEEEEEEEEEEEEEEEE

Answer 1

procedure DeleteLine(FileName:String;Line:Integer);
var s:TStringList;
begin
  try
    s:=TStringList.Create;
    s.LoadFromFile(FileName);
    s.Delete(Line-1);
    s.SaveToFile(FileName);
  finally
    FreeAndNil(s);
  end;
end;

Answer 2

我觉得还是用liangqingzhi(老之)的办法吧。我就常用这个办法来删除文件中的特定行。

Answer 3

应该是要用TStringList的，这样做方便一些。