Ansonsten zum kurzzeitigen ändern:
Delphi-Quellcode:
RichEdit1.SelAttributes.Color := clWhite;
RichEdit1.SelText := 'Ich werde hinzugefügt :-)'; // Ohne Markierung hintendran, ansonsten wird Markierung überschrieben
RichEdit1.SelAttributes.Color := clBlack;