[AlexandrV]

вот код

Код:

...
Procedure AddTextColorRichEdit(Text: String; Color: TColor;RichEditComponent:TRichEdit;StyleFont:TFontStyles);
begin
  RichEditComponent.SelAttributes.Color := Color;
  RichEditComponent.SelAttributes.Style := StyleFont;

  RichEditComponent.SelText := Text;

  RichEditComponent.SelAttributes.Color := clWhite;
  RichEditComponent.SelAttributes.Style := [];
end;
...
AddTextColorRichEdit(' ',clRed,RichEdit1,[]);

Почему пробел прозрачным цветом и как это исправить