anchor.diff:  
       for Prop in InstanceType.GetProperties do
         if Prop.PropertyType.IsInstance then
  -        SetObjectPropsDefaults(Prop.GetValue(Instance).AsObject)
  +        SetObjectPropsDefaults(Prop.GetValue(Instance).AsObject, Filter)
         else
  -      if Prop.IsWritable and PropHasDefaultValue(Prop) then
  +      if Prop.IsWritable and Filter(Instance, Prop) then
           Prop.SetValue(Instance, GetPropDefaultValue(Prop));
     finally
       Ctx.Free;
  
positive.code:     GenerateDefaultConfig
    else
    if FConfigFile.HasFile then
      FillDataFromFile
    else
      SetDefaults;
  end;
  
  destructor TConfigManager.Destroy;
  
negative.code:   end;
  end;
  
  procedure TConfigManager.SetDefaults(NonSerializableOnly : Boolean);
  var
    bValidateCD, bValidateFI : Boolean;
    Filter : TObjectPropertyFilter;
  begin
    bValidateCD := FConfigData.Validate;
    bValidateFI := FConfigData.FixInsightOptions.Validate;
  