Registriert seit: 14. Mai 2003
Ort: Gerstrhofen
1.099 Beiträge
Delphi 10 Seattle Enterprise
|
Mittels TJsonTextWriter ein TJSONObject erzeugen
26. Feb 2018, 23:01
Delphi-Version: 10 Berlin
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
Geändert von Kostas (26. Feb 2018 um 23:40 Uhr)
|