yesful 发表于 2010-12-18 13:10:24

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]
查看完整版本: delphi如何计算文本文件总行数和逐行读取,文本文件包含中英文和数字