Как скопировать содержимое одного RichEdit в другой?

TMemoryStream это самый простой инструмент взаимодействия между всеми VCL компонентами:


procedure
 TForm1.Button1Click(Sender: TObject);
var

  MemoryStream:TMemoryStream;
begin

  MemoryStream:=TMemoryStream.Create;
  try

    RichEdit1.Lines.SaveToStream(MemoryStream);
    MemoryStream.Seek(0
,soFromBeginning);
    RichEdit2.Lines.LoadFromStream(MemoryStream);
  finally

    MemoryStream.Free;
  end
;
end
;




Доска объявлений. Барахолка - мобильные телефоны самсунг. полипропиленовые мешки москва аренда загородного дома в подмосковье