我有一個txt文件,文件第一行,和最后一行,都有 xxxxxxxxxxxxxxxx(年月日時分秒),我想將其修改成當前的時間﹐怎么辦﹐請教了?

Question

读一行，写一行，到xxxxxxxxxxx行，用新的包含现代日起时间的行代替

Answer 1

试用TStringList最简单
属性Strings[你的行数]直接负值然后用SaveToFile就行了
属性COunt就是文件中共多少行

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
        List : TStringList;
begin
        List := TStringList.Create ;
        List.LoadFromFile('C:\test.txt');
        List.Strings[0] := DateTimeToStr(Now);
        List.Strings[List.Count-1] := DateTimeToStr(Now);
        List.SaveToFile('C:\test.txt');
        List.Free ;
end;