anchor.diff:      FButtonsRight: TATTabButtons;
       FOptButtonSize: integer;
       FOptButtonLayout: string;
  +
  +    FOptAnimationEnabled: boolean;
  +    FOptAnimationStepV: integer;
  +    FOptAnimationStepH: integer;
  +    FOptAnimationPause: integer;
   
       FOptVarWidth: boolean;
       FOptMultiline: boolean;
  
positive.code:       end;
  
      R.Right:= R.Left + FTabWidth;
      Data.TabRect:= R;
    end;
  
    if FOptFillWidth and FOptFillWidthLastToo then
  
negative.code:     FOnTabGetCloseAction: TATTabGetCloseActionEvent;
  
      procedure ApplyButtonLayout;
      procedure DoAnimationTabAdd(AIndex: integer);
      procedure DoAnimationTabClose(AIndex: integer);
      procedure DoClickUser(AIndex: integer);
      procedure DoHandleClick;
      procedure DoHandleRightClick;
  