您现在的位置:首页 >> 基础算法 >> window基础 >> 内容

Delphi中复制RTF文本格式到另一个TRichEdit

时间:2011/9/3 15:29:22 点击:

  核心提示:600) this.width = 600;'>var ms: TMemoryStream;begin ms := TMemoryStream.Create; try RichEdit1.Lines....

600) this.width = 600;">

var
   ms: TMemoryStream;
begin
   ms := TMemoryStream.Create;
   try
    RichEdit1.Lines.SaveToStream(ms) ;
    ms.Seek(0, soFromBeginning) ;
    RichEdit2.Lines.LoadFromStream(ms) ;
   finally
    ms.Free;
   end;
end;

作者:网络 来源:转载
共有评论 0相关评论
发表我的评论
  • 大名:
  • 内容:
  • 盒子文章(www.2ccc.com) © 2022 版权所有 All Rights Reserved.
  • 沪ICP备05001939号