Habs schon hinbekommen. Hier meine Lösung:
Delphi-Quellcode:
i := chat.Lines.Count-1;
chat.SelStart := chat.Perform(EM_LINEINDEX, i, 0);
chat.SelLength := Length(chat.Lines[i]);
chat.SelAttributes.Color := edit1.Font.Color;
chat ist ein JvRichEdit.
i ist als integer festgelegt.
Es wird also immer die letzte Zeile gefärbt, denn die Nachricht die man einträgt ist ja immer die letzte.