Вопрос про TMemo Опции

[Unconnected]

Привет всем.

Вопрос: как в TMemo можно выделять другим цветом (шрифтом) определённые участки текста? И ещё, как можно программно избавиться от перевода каретки? Memo1.text:=''; не помогает

[Unconnected]

теперь с RichEdit проблема, в него постепенно добавляются данные и мне нужно выделять цветом части этих строк,делаю так:

s7:=copy(s,1,Pos(';',s)-1)+' ('+slabel1.caption+') > '+#13+copy(s,Pos(';',s)+1,Length(s)-Pos(';',s));
ready.Lines.Insert(0,s7);
ready.selstart:=0;
ready.SelLength:=0;
ready.SelLength:=pos(#13,s);
ready.SelAttributes.color:=clred;

При первом добавлении всё нормально выделяется, а при последующих выделяется вся строка,не часть.