anchor.diff:    beforeChanged;
     fSrcs.Assign(aValue);
     patchPlateformPaths(fSrcs);
  +  updateDcd;
     afterChanged;
   end;
   
  
positive.code:     Configuration[i].onChanged := @subMemberChanged;
  end;
  
  procedure TCEProject.addSource(const aFilename: string);
  var
    relSrc, absSrc: string;
  
negative.code:   hasPatched: Boolean;
  begin
    patchPlateformPaths(fSrcs);
    updateDcd;
    doChanged;
    fModified := false;
    hasPatched := false;
  