Вобщем проблема такая - надо в ричь едите окрасить часть текста,типо так -
красный вводимый текст
красный,пробовал так:
Код:
procedure TForm2.Button3Click(Sender: TObject);
var s:string;
begin
RichEdit1.SelAttributes.Color:=clRed;
s:='[здесь текст красного цвета]'+RichEdit1.SelText+'[здесь текст красного цвета]';
RichEdit1.SelText:=s;
end;
Но так красным окрашивается и текст между скобками(вся строка),как сделать чтобы было окрашено только то,что в '
[здесь текст красного цвета]',а текст который пишется между скобками оставался чёрным.