anchor.diff:      procedure SetReadOnly(Ed: TATSynEdit; AValue: boolean);
       procedure SetTabCaptionAddon(const AValue: string);
       procedure SetTabColor(AColor: TColor);
  +    procedure SetTabPinned(AValue: boolean);
       procedure SetTabImageIndex(AValue: integer);
       procedure SetUnprintedEnds(AValue: boolean);
       procedure SetUnprintedEndsDetails(AValue: boolean);
  
positive.code:   cHistory_Caret       = '/crt';
    //cHistory_Markers     = '/mrk';
    cHistory_TabColor    = '/color';
    cHistory_Bookmark    = '/bm';
    cHistory_BookmarkKind = '/bm_kind';
    cHistory_FoldingShow  = '/fold';
  
negative.code:       c.SetValue(path+cHistory_TabColor, ColorToString(TabColor));
    end;
  
    c.SetDeleteValue(path+cHistory_TabPinned, TabPinned, false);
  
    if UiOps.HistoryItems[ahhCaret] then
      DoSaveHistory_Caret(Ed, c, path);
  
  