anchor.diff:    ACanvas.Font.Size:= MenuStylerTheme.FontSize;
     ACanvas.Font.Style:= [];
   
  -  Windows.GetTextExtentPoint(ACanvas.Handle, PChar(cSampleBig), Length(cSampleBig), Ext2);
  +  Windows.GetTextExtentPoint(ACanvas.Handle, PChar(cSampleTall), Length(cSampleTall), ExtTall);
   
     if mi.IsInMenuBar then
  -    dx2:= dx1
  +    dx:= Ext1.cx
     else
  -    dx2:= Ext2.cx;
  -
  -  Y:= (ARect.Top+ARect.Bottom-Ext2.cy) div 2;
  +    dx:= Ext1.cx * MenuStylerTheme.IndentBigPercents div 100;
  +
  +  Y:= (ARect.Top+ARect.Bottom-ExtTall.cy) div 2;
   
     BufW:= UTF8Decode(mi.Caption);
  -  R.Left:= ARect.Left+dx2;
  +  R.Left:= ARect.Left+dx;
     R.Top:= Y;
     R.Right:= ARect.Right;
     R.Bottom:= ARect.Bottom;
  
positive.code: 
    if mi.ShortCut<>0 then
    begin
      BufA:= ShortCutToText(mi.Shortcut);
      ACanvas.Font.Color:= MenuStylerTheme.ColorFontShortcut;
      Windows.GetTextExtentPoint(ACanvas.Handle, PChar(BufA), Length(BufA), Ext2);
      Windows.TextOut(ACanvas.Handle, ARect.Right-dx2-Ext2.cx, Y, PChar(BufA), Length(BufA));
    end;
  end;
  
  
negative.code:     CharRadiomark: WideChar;
      FontName: string;
      FontSize: integer;
      IndentMinPercents: integer;
      IndentBigPercents: integer;
      IndentRightPercents: integer;
    end;
  
  type
  