anchor.diff:    cAtTabNone = -1; //none tab
     cAtTabPlus = -2;
     cAtArrowDown = -3;
  +  cAtArrowScrollLeft = -4;
  +  cAtArrowScrollRight = -5;
   
   type
     { TATTabs }
  
positive.code:   i: Integer;
    RBottom: TRect;
    AColorXBg, AColorXBorder, AColorXMark: TColor;
    ARect, ARectArrowDown, FRectArrowLeft, FRectArrowRight: TRect;
    AType: TATTabElemType;
    Data: TATTabData;
  begin
  
negative.code:     FTabList: TList;
      FTabMenu: TatPopupMenu;
  
      FScrollPos: integer;
      FImages: TImageList;
      FBitmap: TBitmap;
      FOnTabClick: TNotifyEvent;
  