Помогите пожалуйста с решением 1 вопроса. Использую такую процедуру
procedure TForm1.NotificationInsertText(RichEdit: TRichEdit; const atext: string; acolor: TColor; astyles: TFontStyles);
begin
with RichEdit do
begin
SelAttributes.Color := acolor;
SelAttributes.Style := astyles;
SelText := atext;
end;
end;
для смены цвета текста в RichEdit. Если не использовать темы из вкладке Project => Options => Appearance, то цвет текста меняет всегда, как нужно. Когда я установил там тему для программы, цвета текста не меняется никак. Как решить проблему, чтобы цвет меняется в richedit при использовании темы? Включал/отключал ParentColor и ParentFont, не помогло.