anchor.diff:            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;
  
positive.code: var
    vField: TRttiField;
    vFieldName: string;
  begin
    SetFileNameAndPrefix();
  
  
negative.code: 
    TMappedPropertiesFile = class
    strict private
    [Ignore]
      FPropFile: IPropertiesFile;
      [Ignore]
      FRttiCtx: TRttiContext;
  