Jetzt habe ich aber doch noch Probleme den JSON String auszuwerten.
1. ich muss vorne und hinten die Klammern '[' & ']' entfernen:
data := MidStr(data, 2, Length(data) - 1);
2. danach lade ich es in das ISuperObject
obj := SO(data);
3. ich bekomme nun ein ISuperObject das ich auch auswerten kann.
Jedoch weis ich jetzt nicht wie ich auf die einzelnen "root" Elemente zugreifen kann
Wenn ich es so mache:
Delphi-Quellcode:
obj1 := obj.AsObject.O['spritPrice'];
tmpstr:= obj1.AsString;
// Klammern vorne und hinten entfernen
tmpstr:= MidStr(tmpstr, 2, Length(tmpstr) - 1);
obj1 := SO(tmpstr);
Spritpreis := obj1.AsObject.S['amount'];
Dann bekomme ich immer sozusagen root[0]. Wie komme ich aber auf root[0..9]?