Talvés lo más facil sea cambiar el formato del texto en el clipboard antes de pegar el texto. De la siguiente manera:
Código Delphi
[-]
uses
Clipbrd;
procedure TForm2.EditPaste1Execute(Sender: TObject);
var
T: PChar;
begin
Clipboard.SetTextBuf(PChar( Clipboard.AsText )); RichEdit1.PasteFromClipboard;
end;