anchor.diff:  
   
   procedure DoApplyThemeToTreeview(C: ComCtrls.TTreeview; AThemed, AChangeShowRoot: boolean);
  +var
  +  PrevShowRoot: boolean;
   begin
     if AThemed then
     begin
  
positive.code:     ];
  
    if AChangeShowRoot then
      C.ShowRoot:= true;
    C.ShowLines:= UiOps.TreeShowLines;
    C.RowSelect:= true;
    C.RightClickSelect:= true;
  
negative.code:     C.ExpandSignColor:= GetAppColor('TreeSign');
    end;
  
    PrevShowRoot:= C.ShowRoot;
    C.BorderStyle:= bsNone;
    C.ExpandSignType:= tvestArrowFill;
    C.HideSelection:= false;
  