REST.Json.TJson.ObjectToJsonString formatiert ausgeben?

[TiGü]

Natürlich wäre es schon besser, wenn man der Funktion REST.Json.TJson.ObjectToJsonString mitgeben könnte, ob man den resultierenden JSONString "minified" oder "beautified" haben möchte.

Ich habe, angespornt durch dein kritische Frage, gerade anderthalb Stunden erfolglos versucht, das Result von TJSON.ObjectToJsonObject (ein TJSONObject = class sealed(TJSONValue)) sinnvoll zu einen formattierten JSON-String auszugeben.
Aber es will es mir nicht gelingen.
Vielleicht morgen mehr.