delphi如何知道一个TXT文件有多少行
展开全部
用TStringList加载这个TXT文件,然后TStringList的Count就是行数。如:
var
TxtFile: TStringList;
begin
TxtFile := TStringList.Create;
TxtFile.LoadFromFile('D:\Test.txt');
ShowMessage('行数为: ' + IntToStr(TxtFile.Count));
TxtFile.Free;
end;
var
TxtFile: TStringList;
begin
TxtFile := TStringList.Create;
TxtFile.LoadFromFile('D:\Test.txt');
ShowMessage('行数为: ' + IntToStr(TxtFile.Count));
TxtFile.Free;
end;
来自:求助得到的回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询