anchor.diff:      FTabIndentArrowRight: Integer; //width of down-arrow area at right
   
       //show
  +    FTabShowScrollArrows: boolean;
       FTabShowClose: TATTabShowClose; //show mode for "x" buttons
       FTabShowPlus: boolean; //show "plus" tab
       FTabShowPlusText: atString; //text of "plus" tab
  
positive.code:     property TabIndentArrowLeft: Integer read FTabIndentArrowLeft write FTabIndentArrowLeft;
      property TabIndentArrowRight: Integer read FTabIndentArrowRight write FTabIndentArrowRight;
  
      property TabShowClose: TATTabShowClose read FTabShowClose write FTabShowClose;
      property TabShowPlus: boolean read FTabShowPlus write FTabShowPlus;
      property TabShowPlusText: atString read FTabShowPlusText write FTabShowPlusText;
  
negative.code: procedure TATTabs.SetTabAngle(AValue: Integer);
  begin
    {$ifdef darwin}
    //macOS paints angled tabs badly
    exit;
    {$endif}
  
    if FTabAngle=AValue then Exit;
    FTabAngle:= AValue;
  end;
  
  procedure TATTabs.SetTabAngleMaxTabs(AValue: Integer);
  begin
    if FTabAngleMaxTabs=AValue then Exit;
    FTabAngleMaxTabs:= AValue;
  end;
  
  
  