anchor.diff:    fname := PString(lstFiles.Selected.Data)^;
     if not fileExists(fname) then exit;
     CEMainForm.openFile(fname);
  +end;
  +
  +procedure TCEMiniExplorerWidget.lstFilesDblClick(Sender: TObject);
  +begin
  +  shellOpenSelected;
   end;
   
   procedure TCEMiniExplorerWidget.shellOpenSelected;
  
positive.code:   lstFiles.Clear;
  end;
  
  procedure TCEMiniExplorerWidget.lstFilesDblClick(Sender: TObject);
  begin
    shellOpenSelected;
  end;
  
  procedure TCEMiniExplorerWidget.btnAddFavClick(Sender: TObject);
  begin
    if Tree.Selected = nil then exit;
  
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;
  
  