RichEdit Font Probleme

[Jasmine]

Hallo Liebe Delphi Freunde,

ich habe mal wieder ein Problem und finde trotz Suche keine Lösung.

Ich möchte bei einem TRichEdit verschiedene Zeilen mit verschiedenen Font
Attributen ändern. Also ich schreibe zeilenweise ins RichEdit mit
.Lines.Add('')
Nun möchte ich jedoch zum Beispiel die erste Zeile in fett und rot,
die 8. Zeile in kursiv und blau, usw. setzen können.

Mit Sel.Attributes komme ich irgendwie nicht klar.
.SelAttributes.Color:=clRed;
geht zwar, jedoch bekomme ich die Styles nicht hin, zB :=fsBold ...

Gibt es nicht eine einfache Lösung um zeilenweise die Font Eigenschaften zu ändern ?

Vielen Dank für Eure Mühe und Gedult mit mir

Jasmine