Formatierten Text in ein TRichEdit einfügen

[Lannes]

Hallo,

z.B.

Delphi-Quellcode:

  with Richedit1 do
  begin
    SelStart := 2;
    SelAttributes.Color := clRed;
    SelText := 'Hallo';
  end;