anchor.diff:      constructor Create;
       destructor  Destroy; override;
       // node related
  -    procedure   UnregisterSubNode(aNode: TfpgTreeNode);
  -    procedure   Append(aValue: TfpgTreeNode);
       function    AppendText(AText: string): TfpgTreeNode;
  +    function    Count: integer;
  +    function    CountRecursive: integer;
       function    FindSubNode(AText: string; ARecursive: Boolean): TfpgTreeNode;
       function    GetMaxDepth: integer;
       function    GetMaxVisibleDepth: integer;
  +    procedure   Append(aValue: TfpgTreeNode);
  +    procedure   Clear;  // remove all nodes recursively
       procedure   Collapse;
       procedure   Expand;
  -    function    Count: integer;
  -    function    CountRecursive: integer;
       procedure   Remove(aNode: TfpgTreeNode);
  -    procedure   Clear;  // remove all nodes recursively
  +    procedure   UnregisterSubNode(aNode: TfpgTreeNode);
       // parent color settings
  +    function    ParentInactSelColor: TfpgColor;
  +    function    ParentInactSelTextColor: TfpgColor;
  +    function    ParentSelColor: TfpgColor;
  +    function    ParentSelTextColor: TfpgColor;
       function    ParentTextColor: TfpgColor;
  -    function    ParentSelTextColor: TfpgColor;
  -    function    ParentSelColor: TfpgColor;
  -    function    ParentInactSelTextColor: TfpgColor;
  -    function    ParentInactSelColor: TfpgColor;
       // general properties
       property    Collapsed: boolean read FCollapsed write SetCollapsed;
  +    property    Data: Pointer read FData write FData;
  +    property    FirstSubNode: TfpgTreeNode read FFirstSubNode;
  +    property    ImageIndex: integer read FImageIndex write FImageIndex;
  +    property    LastSubNode: TfpgTreeNode read FLastSubNode;
       property    Next: TfpgTreeNode read FNext write FNext;
  +    property    Parent: TfpgTreeNode read FParent write SetParent;
       property    Prev: TfpgTreeNode read FPrev write FPrev;
       property    Text: string read FText write SetText;
  -    property    Parent: TfpgTreeNode read FParent write SetParent;
  -    property    FirstSubNode: TfpgTreeNode read FFirstSubNode;
  -    property    LastSubNode: TfpgTreeNode read FLastSubNode;
  -    property    ImageIndex: integer read FImageIndex write FImageIndex;
       // color settings
  -    property    TextColor: TfpgColor read FTextColor write SetTextColor;
  +    property    InactSelColor: TfpgColor read FInactSelColor write SetInactSelColor;
  +    property    InactSelTextColor: TfpgColor read FInactSelTextColor write SetInactSelTextColor;
       property    SelColor: TfpgColor read FSelColor write SetSelColor;
       property    SelTextColor: TfpgColor read FSelTextColor write SetSelTextColor;
  -    property    InactSelColor: TfpgColor read FInactSelColor write SetInactSelColor;
  -    property    InactSelTextColor: TfpgColor read FInactSelTextColor write SetInactSelTextColor;
  +    property    TextColor: TfpgColor read FTextColor write SetTextColor;
     end;
     
     
  
positive.code:     property    RootNode: TfpgTreeNode read GetRootNode;
      property    Selection: TfpgTreeNode read FSelection write SetSelection;
    published
      property    ShowImages: boolean read FShowImages write SetShowImages default False;
      property    ShowColumns: boolean read FShowColumns write SetShowColumns default False;
      property    FontDesc: string read GetFontDesc write SetFontDesc;
      property    DefaultColumnWidth: word read FDefaultColumnWidth write SetDefaultColumnWidth;
      property    TreeLineColor: TfpgColor read FTreeLineColor write SetTreeLineColor;
      property    TreeLineStyle: TfpgLineStyle read FTreeLineStyle write SetTreeLineStyle;
      property    ScrollWheelDelta: integer read FScrollWheelDelta write FScrollWheelDelta;
      property    OnChange: TNotifyEvent read FOnChange write FOnChange;
      property    OnExpand: TfpgTreeExpandEvent read FOnExpand write FOnExpand;
    end;
  
negative.code: begin
    if FParent <> nil then
      FParent.UnregisterSubNode(self);
    FData := nil;
    inherited Destroy;
  end;
  
  