Im Prinzip stand alles was du wissen musst in der ersten Antwort:
Kurz ausgedrückt: Du rutscht über ein TDataSet
drüber und willst für jede Zeile ein neues Json-Objekt in ein Json-Array stecken. Richtig?
Ich würde erst einmal dein System.Json.TJsonArray
erstellen. Dann "pro Zeile" ein TJsonObject erstellen (über deinen TJSONObjectBuilder
oder wie auch immer) und das mittels myJsonArray.AddElement(meinFrischErstelltesObjekt)
hinzufügen.
Michael
"Programmers talk about software development on weekends, vacations, and over meals not because they lack imagination,
but because their imagination reveals worlds that others cannot see."