Return from VCL to TMS style

The form and some components still retain the colors from the VCL

frmstlrVisualOption.ApplyStyle; // FormStyler

procedure TfrmVisualOptions.frmstlrVisualOptionChange(Sender: TObject);
oAppearance.TSMCentre.TMSStyle := frmstlrVisualOption.Style;
StyleName := TRttiEnumerationType.GetName(frmstlrVisualOption.Style);
StyleName := Copy(StyleName, StartCopy, Length(StyleName));

In other words. I need to cancel the effect of the VCL style.

Did you set control.StyleElements := [] if you do not want VCL styles to be applied?

Thanks, that didn't occur to me. I'll try.

It is OK.