Mittels TJsonTextWriter ein TJSONObject erzeugen

[Kostas]

HALT: Hat sich erledigt. Ich habe nur das falsche Objekt übergeben.

Hallo Zusammen,

ich verwende die Klasse TJsonTextWriter und erzeuge damit ein aufwendige JSON Struktur. Diese Struktur kann ich auch über ein TFileStream als Datei schreiben.
Dieses JSON benötige ich jetzt als JSONObject. Hat jemand eine Idee wie das geht?

    OrdersJSON := TJSONObject.ParseJSONValue(TEncoding.UTF8.GetBytes(sw.ToString), 0) as TJSONObject; So geht es leider nicht OrdersJSON ist nil

Gruß Kostas

[himitsu]

Warum nimmst du nicht gleich das ParseJSONValue, welches einen String nimmt?
http://docwiki.embarcadero.com/Libra...ON.TJSONObject

Aber ja, einige der Parse-Funktionen werfen keine Fehler ... sie geben einfach nix raus, wenn der JSONString nicht valide ist,
oder wenn weitere Zeichen/Bytes nach Ende des äußeren Nodes liegen.