anchor.diff:    fInclNode.DeleteChildren;
     fXtraNode.DeleteChildren;
     if fProject = nil then exit;
  +  Tree.BeginUpdate;
     // display main sources
     for src in fProject.Sources do
      begin
  
positive.code: end;
  {$ENDREGION}
  
  {$REGION Insêctor things -------------------------------------------------------}
  procedure TCEProjectInspectWidget.TreeKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
  begin
    if Key = VK_RETURN then
  
negative.code:     end;
    end;
    fXtraNode.Collapse(false);
    Tree.EndUpdate;
  end;
  {$ENDREGION --------------------------------------------------------------------}
  
  