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