Delphi实现类的持久化保存（DFM格式)

概述var inStream,outStream:TMemoryStream;begin inStream:=TMemoryStream.Create; outStream:=TMemoryStream.Create; try inStream.WriteComponent(self); inStream.Position:=0;

var inStream,outStream:TMemoryStream;begin   inStream:=TMemoryStream.Create;   outStream:=TMemoryStream.Create;   try      inStream.WriteComponent(self);      inStream.position:=0;      ObjectBinaryToText(inStream,outStream);      outStream.position:=0;      outStream.Savetofile(‘c.txt‘);   finally     FreeAndNil(inStream);     FreeAndNil(outStream);   end;   //WriteComponentResfile(‘c.res‘,self);end;

读取，反过来就是了，不多说。

总结

以上是内存溢出为你收集整理的Delphi实现类的持久化保存（DFM格式)全部内容，希望文章能够帮你解决Delphi实现类的持久化保存（DFM格式)所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。