Wenn du alles kopieren willst, dann nimm doch einfach einen MemoryStream:
Delphi-Quellcode:
procedure TForm1.Kopieren;
Var
Strom : TMemoryStream;
begin
Strom := TMemoryStream.Create;
Try
RichEdit1.Lines.SaveToStream(Strom);
Strom.Position := 0;
RichEdit2.Lines.LoadFromStream(Strom);
Finally
Strom.Free;
End;
end;
Und wenn du an bestehenden Text im zweiten RichEdit anhängen willst,
siehe dort.