anchor.diff:  
     if bDisabled then
       ACanvas.Font.Color:= MenuStylerTheme.ColorFontDisabled
  +  else
  +  if bSel and (MenuStylerTheme.ColorFontSelected<>clNone) then
  +    ACanvas.Font.Color:= MenuStylerTheme.ColorFontSelected
     else
       ACanvas.Font.Color:= MenuStylerTheme.ColorFont;
   
  
positive.code:   TWin32MenuStylerTheme = record
      ColorBk: TColor;
      ColorBkSelected: TColor;
      ColorBorder: TColor; //used only if <>clNone
      ColorFont: TColor;
      ColorFontDisabled: TColor;
      ColorFontShortcut: TColor;
      CharCheckmark: WideChar;
  
negative.code:     CharSubmenu: WideChar;
      FontName: string;
      FontSize: integer;
      //indents in percents of average char width
      IndentMinPercents: integer; //indent from edges to separator line
      IndentBigPercents: integer; //indent from left edge to caption
      IndentIconPercents: integer; //indents around the icon
  