如何用DELPHI判断某个文本文件(*.txt)中有多少行,(50分)

  • 主题发起人 主题发起人 daichen
  • 开始时间 开始时间
D

daichen

Unregistered / Unconfirmed
GUEST, unregistred user!
如何用DELPHI判断某个文本文件(*.txt)中有多少行,并在这些行之后添加
别的文字,而且不覆盖原先的内容。谢谢。
 
最简单的办法就是用TStringList;
Strs := TStringList.Create;
Strs.LoadFromFile(FileName);
Strs.Count;这就是多少行了
Strs.Add('字符串');在这些行之后添加别的文字
Strs.SaveToFile(FileName);
Strs.Free;
 
也可以读到字符串里,判#10,#13

用TSTRINGLIST,它已帮你写好了这些代码.

还是听UNREAL的吧.
 
用unreal的方法得到的是换行以后的行数,要得到原始行数还是应该判断#13#10
 
什么叫换行以后的行数?TStringList可不会WordWarp。
 
unreal的方法最简单实用了
 
sorry, 我把unreal的TStringList看成richedit了,哎最近看richedit太多 :-(
 
也可读文件到memo ,在用memo.lines.count-1
 
多人接受答案了。
 
后退
顶部