Hay varias formas.
Una muy sencilla es usando el método CopyToClipboard del primer RichEdit y PasteFromClipboard del segundo.
Si quieres copiar todo el contenido del primer RichEdit y/o reemplazar todo el texto del segundo usas el método SelectAll de uno u otro control.
Este método usando el portapapeles puede no ser muy conveniente ya que visualmente se selecciona el texto.
Otra manera de hacerlo es a través de un Stream:
Código Delphi
[-]
var
Stream: TStringStream;
begin
Stream := TStringStream.Create('');
try
RichEdit1.Lines.SaveToStream(Stream);
Stream.Seek(0, soFromBeginning);
RichEdit2.Lines.LoadFromStream(Stream);
finally
Stream.Free;
end;
end;
// Saludos