Delphi的TStreamReader逐行读取文本文件

本文整理自网络，侵删。

 
procedure TForm1.FormCreate(Sender: TObject);
var
  reader: TStreamReader;
  line: String;
begin
  reader := TStreamReader.Create('新建文本文档.txt', TEncoding.Default);
  while not reader.EndOfStream do
  begin
   Memo1.Lines.Add (reader.ReadLine);
  end;
  reader.Free;

end;
 

相关阅读 >>

Delphi 检测文件是否被占用

Delphi 如何将颜色值转换为html格式？

Delphi windows 根据进程名结束进程的代码

Delphi显示gif动画简单方法

Delphi应用synedit完美实现sql语法高亮

Delphi程序与chm帮助关联的简单实现

Delphi中将webbrowser用作网页编辑器

Delphi 检查父进程

Delphi 之 tmemo组件使用

Delphi 判断是否是十六进制数

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi的TStreamReader逐行读取文本文件