TJSONObjectBuilder keine leeren Objekte/Arrays

[Zacherl]

Hallo zusammen,

ich schaue mir grade das System.JSON.Builders Framework an. Rufe ich dort:

Delphi-Quellcode:

Builder
  .BeginObject
    .BeginObject('test')
    .EndObject
  .EndObject

auf, dann erhalte ich als Output:

Code:

{
  "test": {}
}

also ein leeres Objekt namens "test".

Macht soweit natürlich Sinn. Meine Frage jetzt aber trotzdem:
Ist es möglich die Objekte/Arrays erst dann zu schreiben, wenn sie mindestens ein eigenes Feld besitzen?

Hintergrund ist, dass ich eine Hierachie von Klassen serialisieren will. Jede Klasse besitzt eine Serialize Methode, der ich eine Builder Instanz und den Feldnamen übergeben will. Die Instanz soll sich dann selbstständig serialisieren. Jetzt kann es passieren, dass alle Felder der Instanz die Standardwerte besitzen. In diesem Falle sollen die Felder nicht im JSON erscheinen.
Ich würde nun gerne weiterhin die Felder nach und nach prüfen, also:

Delphi-Quellcode:

Builder.BeginObject(FieldName);
if (Field1 <> Default1) then Builder.Add('field1', Field1);
if (Field2 <> Default2) then Builder.Add('field2', Field2);
..
Builder.EndObject;

Ist sowas mit dem System.JSON.Builders Framework möglich, oder müsste ich tatsächlich vor dem BeginObject erstmal alle Felder auf Standardwerte prüfen?

Viele Grüße
Zacherl