anchor.diff:    public
       function _AddElement(Name: TmXMLString): TmXmlElement; override;
       function _HasAttribute(const Name: TmXMLString): boolean; override;
  +    procedure _DeleteAttribute(const aName: TmXMLString); override;
       procedure _SetAttribute(Name, Value: TmXmlString); override;
   
       function _GetAttribute(Name: TmXmlString): TmXmlString; overload; override;
  
positive.code: function TImpl_oxml_mXmlElement._HasAttribute(const Name: TmXMLString): boolean;
  begin
    Result := Self.FNode^.HasAttribute(Name);
  end;
  
  
  
negative.code:     procedure _SetIntegerAttribute(Name : TmXmlString; Value: integer); override;
      function _GetIntegerAttribute(Name: TmXmlString): integer; overload; override;
      function _GetIntegerAttribute(Name: TmXmlString; Default : integer): integer; overload; override;
  
      procedure _SetValue(const aValue: TmXMLString); override;
      function _GetValue: TmXMLString; override;
      procedure _SetDateTimeValue(const aValue : TDateTime); override;
  