delphi如何计算文本文件总行数和逐行读取,文本文件包含中英文和数字
在delphi如何计算文本文件总行数和逐行读取,文本文件包含中英文和数字;我写了程序,可以读到中文,但读不到数字,我的文本文件里面的内容时:名称+N个空格+温度数据,如:卧室 20℃;还有,中文数据跟温度数据如何分离到两个变量中?请高手们锡教,搞了很久都还未搞出来,急!!!AssignFile(TempFile,'C:\Program Files\MTCS2000\Bmp\自由查询明细报表.txt') ;
Reset(TempFile) ;
try
while(line <5) dobegin
Readln(TempFile,Temp1);
Form1.Memo1.lines.Add(Temp1);
line := Memo1.Lines.Count;
end;
finally
CloseFile(TempFile);
end;
页:
[1]