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

[Unconnected]

Привет всем.

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

[volvo]

Попробуй принудительно сбросить цвет у всего текста в новом сообщении, который не должен быть красным:

s7 := // тут собираешь свою строку

ready.Lines.Insert(0, s7); // сначала добавляешь, потом управляешь атрибутами !!!
b := Pos(#$D, s7); // var b: integer
ready.SelStart := 0;
ready.SelLength := b;
ready.SelAttributes.Color := clRed;
ready.SelStart := b;
ready.SelLength := Length(s7) - b;
ready.SelAttributes.Color := clBlack;