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 xe 关闭android应用

delphDelphi chromium embedded 清除指定链接浏览器缓存、cookies

Delphi url取得文件名

Delphi如何在tmemo控件光标当前位置插入字符串

Delphi winapi: flashwindow - 闪烁窗口

Delphi将图片转换成base64编码函数

Delphi hash md5

Delphi隐藏进程

winapi 字符及字符串函数(4): charupperbuff - 把缓冲区中指定数目的字符转大写

Delphi 删除cookies及上网记录

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

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