Delphi: массив JSON

Попытка понять JSON в Дельфах. Используя модуль "DBXJSON.pas". Как с его помощью сделать вот такой массив:

Array:[
        {"1":1_1,"1_2_1":1_2_2},
        ...,
   ]

Делаем так:

JSONObject:=TJSONObject.Create;
JSONArray:=TJSONArray.Create();
...
JSONArray.AddElement(TJSONObject.Create(TJSONPair.Create('1','1_1')));
JSONArray.AddElement(TJSONObject.Create(TJSONPair.Create('1_2_1','1_2_2')));
JSONObject.AddPair('Array',JSONArray);

, но получаем вот это:

{
"Array":[
{"1":"1_1"},{"1_2_1":"1_2_2"}
]
}

Пожалуйста, помогите! Спасибо!