anchor.diff:  //  inherited HandlePaint;
   
     Canvas.ClearClipRect;
  -  Canvas.Clear(FBackgroundColor);
  +  Canvas.Clear(BackgroundColor);
   
     // Limit painting in the UI Designer
     if csDesigning in ComponentState then
  
positive.code:         Canvas.FillRectangle(w + imgx - FXOffset, ACenterPos - (GetNodeHeight div 2), GetNodeWidth(h) - imgx, GetNodeHeight);
        end;
  
        Canvas.DrawString(w + imgx - FXOffset, ACenterPos - (GetNodeHeight div 2), h.text);
  
        Canvas.SetTextColor(h.ParentTextColor);
        Canvas.SetLineStyle(1, FTreeLineStyle);
  
negative.code:     Result := 0
    else
    begin
      Result := FFont.TextWidth(ANode.Text) + 4;
      if ShowImages and ((ImageList <> nil) or (StateImageList <> nil)) then
      begin
        if ImageList <> nil then
  