delphi save .dfm to .txt

2021-01-18 19:36

阅读：571

标签：roc binary final span file object position com nal

procedure TForm2.saveDfm;
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;
end;

标签：roc binary final span file object position com nal

原文地址：https://www.cnblogs.com/tobetterlife/p/12173002.html

上一篇：C#生成城市按照一定格式且按字母顺序的方法

下一篇：C#执行系统命令

文章来自：搜素材网的编程语言模块，转载请注明文章出处。
文章标题：delphi save .dfm to .txt
文章链接：http://soscw.com/index.php/essay/43784.html

亲，登录后才可以留言！

delphi save .dfm to .txt

评论

热门文章

推荐文章

最新文章

置顶文章