Ja, es funktioniert!
Und wie liest man einen Boolean-Wert(bei 'dat3') aus? (und null-Wert bei 'dat2')
Code:
var
flag:Boolean;
Begin
JSONObj:=TJSONObject.ParseJSONValue(JSONText) As TJSONObject;
JSONData:=TJSONObject.ParseJSONValue(TJSONObject.ParseJSONValue(JSONObj.Get('data').JsonValue.Value).ToString) As TJSONObject;
flag:=???
End;
ich dachte ungefähr so: StrToBool(JSONData.Get('dat3').JsonValue.Value);
so gibt aber einen leeren String in Value zurück.