anchor.diff:    treeScanSubFolders(Tree.Selected);
   end;
   
  -//TODO-cbugfix: it leaks expanded nodes data.
   procedure TCEMiniExplorerWidget.expandPath(const aPath: string);
   var
     i: NativeInt;
  
positive.code: procedure TCEMiniExplorerWidget.lstFavDblClick(Sender: TObject);
  begin
    if lstFav.Selected = nil then exit;
    expandPath(lstFav.Selected.Caption);
  end;
  
  {$ENDREGION}
  
  {$REGION Files -----------------------------------------------------------------}
  
negative.code:   if not Selected then exit;
    //
    fLastFold := PString(Item.Data)^;
    lst := TStringList.Create;
    try
      lstFiles.Items.Clear;
      listFiles(lst, fLastFold);
      fillLstFiles(lst);
    finally
      lst.Free;
    end;
  end;
  
  