Изменение атрибутов текста в RichEdit'е на лету

[se®pent]

Даровайте!

Есть трабл

Задача:
Получить текст из базы в RichEdit'е но так чтоб к примеру первое поле выводилось жирным, второе красным и прочее
Первое поле<font color=red>второе поле</font>

как быть?
не ужели запоминать концы участка, выделять и применять атрибуты?

[Naeel Maqsudov]

не ужели запоминать концы участка, выделять и применять атрибуты?

Да.
Можно еще также по ходу добавления текста:


with RichEdit1 do with Lines,SelAttributes do begin
Color:=clred;
Add('qwe');
Color:=clblue;
Add('wertwert');
Color:=clred;
Add('qwe');
Color:=clblue;
Add('wertwert');
end;

[se®pent]

угу пасиб!
а существует какая либо возможность добавления текста на туще строку что был добавлен предыдущий? RichEdit1->Lines->Add("dsfsadf");
не используя
RichEdit1->Lines->Strings[k]=RichEdit1->Lines->Strings[k]+" ";
?

[Naeel Maqsudov]

Элементарно



RichEdit1.SelAttributes.Color := clred;
RichEdit1.SelText := RichEdit1.SelText+'The red text. ';
RichEdit1.SelAttributes.Color := clblue;
RichEdit1.SelText := RichEdit1.SelText+'The blue text on the same line.';



SelText - это либо то, что выделено, либо просто место где стит курсор.