关于文件操作

Question

一文本文件格式如下：
1
2
3
4
....
100
如何将最后一行的数据进行修改。比如把100修改成为101。

Answer 1

用richedit打开var 
  s:string;
  a:integer;
  
  a:=rechedit1.lines.count;
  s:=richedit1.lines[a-1];

Answer 2

var
 myList:TStrings;
begin
 myList:=TStringList.Create;
 myList.LoadFromFile('d:\test.txt');
 myList.Strings[myList.Count-1]:='101';
 myList.SaveToFile('d:\test.txt');
 myList.Free;
end;