Обработка запроса JSON

@BoBCP · Регистрация: 28.09.2011

Author24 — интернет-сервис помощи студентам

Доброй ночи.

Следующая проблема.
С помощью запроса Get, я получаю JSON, из которого я хотел бы вытащить данные в массив, после чего его отсортировать.

Javascript

{"response":[57,
       {"id":196,"from_id":-46143300,"to_id":-46143300},
       {"id":16,"from_id":-4610,"to_id":-4600}
]}

В интернете я набрел на DBXJSON, который идет по стандарту в XE начиная со второй версии.

Delphi

    OBj2 := TJSONObject.Create;
    OBj2 := (OBj2.ParseJSONValue(Parse_json) As TJSONObject);
    Parse_json:= OBj2.ToString;
    JArr2 := ((OBj2.Get('response').JsonValue As TJSONArray));

При этом я получаю доступ только к первому элементу массива response (57) , каким образом добраться до id и до from id?

Добавлено через 13 часов 0 минут
Неужели никто не работал с json на делфи???

	17.12.2012, 12:06