procedure Tform1.Button1Click(Sender: TObject);
begin
RichEdit1.SelAttributes.Color:=clRed;
end;
Мне кажется что при нажатии кнопки делается красным цвет шрифта выделенного в RichEdit1
procedure Tform1.Button1Click(Sender: TObject);
begin
RichEdit1.SelAttributes.Color:=clRed;
end;