Parser.Options := [soReadIgnoreUnknownFields];
U := '{ "A" : 1 , "B" : 2 , "C" : 3 , "D" : "A" , "tobeignored":null,"E": '#13#10+
'{ "E1" : 4, "E2" : 5 } , "tbi" : { "b" : 0 } }';
RecordLoadJSON(JR2,@U[1],TypeInfo(TTestCustomJSONRecord));
I was able to reproduce the issue.
Should be fixed by http://synopse.info/fossil/info/0f8cd9c9a0
Thanks for the feedback!
]]>I'm a bit lost here...
Code is supposed (and tested) to work with no problem for JSON content using any characters within [#1..' '] range.
Very happy with new record <-> json functionality.
Trying to DynArrayLoadJSON valid JSON string I get wrong/no result.
Figured out, that if I delete all #13 #10 #9 chars from source json string everything goes correct.
It is in case where I have array of record inside array of record.