Как парсить JSON в D2010

В D2010 появилась поддержка JSON.
Только вот синтаксис там слегка отличается от того, что стало в более поздних версиях.

Вместо TJSONObject.ParseJSONValue(response) as TJSONObject
Надо писать TJSONObject(TJSONObject.ParseJSONValue(TEncoding.ASCII.GetBytes(response), 0));

А как перебрать массив после этой строки?
Get('data').JsonValue не работает, хочет Integer вместо 'data'.

Есть какой пример рабочий? Или компонент другой посоветуете для работы?

Зурбаган,

Конечно, компонент.
Superobject или x-superobject. Совместимость с древних версий и непревзойденное удобство.

Кстати, SuperObject сейчас доступен в overbyteICs. В него и xml-ки можно парсить. Вроде все версии delphi поддерживаются.

Зурбаган	↑
... А как перебрать массив после этой строки? Get('data').JsonValue не работает, хочет Integer вместо 'data'. ...

Для массива было Get(i), как ни удивительно.