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