Question

delphi 类richedit 怎么把 一个richedit的带格式的字符串付给 另一个richedit(要保留格式）

急急急！！！ 急急急！！！！！！？？？？谢谢

Answer 1

RichEdit1.SelStart := 0;//起始位置
RichEdit1.SelLength := 3;//拷贝字符串长度
RichEdit1.CopyToClipboard;
RichEdit2.SelStart := 2;//插入位置
RichEdit2.PasteFromClipboard;

Answer 2

第一种.复制
richedit1.SelectAll;
richedit1.CopyToClipboard;
richedit2.SelectAll;
richedit2.PasteFromClipboard;
第二种.
richedit1.lines.assign(richedit2.lines);