最简单的办法.begin with tstringlist.create do begin ls.loadfromfile(''); ls.add('');end; ls.savetofile(''); ls.free;
靠,按空格键居然答复了.with tstringlist.create do free; begin loadfromfile(''); add(''); savetofile(''); end;
Delphi 如安在文本文件中添加一行文本（须要保存本来文本文件内容），感谢！各位大大虾！！
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024