Darauf zu achten ist, dass PlainText false ist.
Ist es true werden die Formatierungen beim Speichern entfernt.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
RichEdit1.PlainText:=false;
RichEdit1.Lines.SaveToFile('c:\test.rtf');
end;
Grüße
Kalus