delphi读取文本(一行一行读入)

本文整理自网络，侵删。

 读文本，没办法一步到位吧？只能通过Memo来实现，先放置一个Memo组件，设置其为隐藏，并且不要让它自动转行，即WrodWrap属性设为False，这里必须要设，否则句子过长自动换行后，Memo会把它当成两行处理，然后把文件通过Memo1.Lines.LoadFromFile('文件名')载入。然后对这个Memo进行操作。
procedure TForm1.Button1Click(Sender: TObject);
begin
Edit1.Text:=Memo1.Lines.Strings[0];//固定读取第一行
Memo1.Lines.Delete(0);//把第一行删掉，让下面一行成为第一行
end;  

相关阅读 >>

Delphi使用hough变换查找直线

Delphi 获取url特殊路径

Delphi字符串加密解密

Delphi 加壳exe的方法

Delphi 动态调用chm文件

Delphi 创建多级目录

Delphi fmx jpg 保存数据库 从数据库读取

Delphi thttprio 控件调用webservice超时问题

Delphi 如何把字符串覆给数组

Delphi 以二进制方式读取图片保存到string

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

转载请注明出处：木庄网络博客 » delphi读取文本(一行一行读入)