anchor.diff:  
     TMappedPropertiesFile = class
     strict private
  -    [Ignore]
  +  [Ignore]
       FPropFile: IPropertiesFile;
       [Ignore]
       FRttiCtx: TRttiContext;
  
positive.code: var
    vField: TRttiField;
    vFieldName: string;
  begin
    SetFileNameAndPrefix();
  
  
negative.code:           begin
              if not FPropFile.PropertyItem[vFieldName].IsEmpty then
                vField.SetValue(Self, StrToFloatDef(FPropFile.PropertyItem[vFieldName], 0));
              FFieldList.AddOrSetValue(vFieldName, vField);
            end;
          tkEnumeration:
            begin
              if not FPropFile.PropertyItem[vFieldName].IsEmpty then
              begin
                vEnumValue := vField.GetValue(Self);
                vEnumValue := TValue.FromOrdinal(vEnumValue.TypeInfo, GetEnumValue(vEnumValue.TypeInfo, FPropFile.PropertyItem[vFieldName]));
                vField.SetValue(Self, vEnumValue);
              end;
              FFieldList.AddOrSetValue(vFieldName, vField);
            end;
        end;
  