anchor.diff:      property TabImageIndex: integer read FTabImageIndex write FTabImageIndex default -1;
       property TabFontStyle: TFontStyles read FTabFontStyle write FTabFontStyle default [];
       property TabPopupMenu: TPopupMenu read FTabPopupMenu write FTabPopupMenu;
  +    property TabSpecialWidth: integer read FTabSpecialWidth write FTabSpecialWidth default 0;
  +    property TabSpecialHeight: integer read FTabSpecialHeight write FTabSpecialHeight default 0;
     end;
   
   type
  
positive.code:     NWidthPlus:= GetTabRectWidth(true);
    if FOptMultiline then
      FTabWidth:= FOptTabWidthNormal;
  
    R.Left:= FRealIndentLeft;
    R.Right:= R.Left;
  
negative.code:     if i>0 then
        Inc(R.Left, FOptSpaceBetweenTabs);
  
      if Data.TabSpecialWidth>0 then
        FTabWidth:= Data.TabSpecialWidth
      else
      if FOptVarWidth then
      begin
        C.Font.Style:= Data.TabFontStyle;
  