Delphi 2010 TStreamReader 和TStreamWriter

it2022-05-09  25

很简单的实例,读写txt文件。

读txt文件

1 var2 Reader: TStreamReader;3 begin4 Reader := TStreamReader.Create( 'txt路径',TEncoding.UTF8); //utf8 编码读写text1.txt5 6 edtTitle.Text := Reader.ReadLine(); //读取一行7 mmText.Text := Reader.ReadToEnd(); //读取全部8 Reader.Free(); //关闭和释放9 end;

写txt文件

1 var2 Writer: TStreamWriter;3 begin4 Writer := TStreamWriter.Create('txt路径',false, TEncoding.UTF8); //打开写的文件5 Writer.WriteLine(edtTitle.Text); //写一行6 Writer.Write(mmText.Text); //写全部7 Writer.Free();8 end;

转载于:https://www.cnblogs.com/imlions/archive/2012/02/06/delphi2010tstream.html

相关资源:Delphi 7 Indy IndyDemos 展示网络编程范例

最新回复(0)