anchor.diff:    InitToolbar;
   
     PanelCodeTreeAll:= TATPanelSimple.Create(Self);
  +  PanelCodeTreeAll.OnEnter:= @DoCodetree_PanelOnEnter;
   
     CodeTree:= TAppTreeContainer.Create(Self);
     CodeTree.Parent:= PanelCodeTreeAll;
  
positive.code:     //procedure DoOnTabOver(Sender: TObject; ATabIndex: Integer);
      procedure DoOnTabPopup(Sender: TObject; APages: TATPages; ATabIndex: integer);
      function DoOnTabGetTick(Sender: TObject; ATabObject: TObject): Int64;
      procedure DoCodetree_GetSyntaxRange(ANode: TTreeNode; out APosBegin, APosEnd: TPoint);
      procedure DoCodetree_SetSyntaxRange(ANode: TTreeNode; const APosBegin, APosEnd: TPoint);
      procedure DoCodetree_OnDblClick(Sender: TObject);
  
negative.code:     procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
      procedure FormResize(Sender: TObject);
      procedure FormShow(Sender: TObject);
      procedure FrameAddRecent(Sender: TObject; const AFileName: string);
      procedure FrameOnMsgStatus(Sender: TObject; const AStr: string);
      procedure FrameOnChangeCaretPos(Sender: TObject);
  