Доброго дня!
Есть такая задача:
Я делаю GET запрос на страницу, она мне отдаёт результат в JSON, я выдираю от туда id, и записываю их в одну строку:
if JSON.TryGetValue<TJSONArray>('response.items', JSONArr) then
begin
for I := 0 to JSONArr.GetValue<TJSONArray>.Count - 1 do
begin
if I > 0 then
user_id_list := user_id_list + ',' + JSONArr.GetValue<string>('[' + IntToStr(i) + '].message.user_id')
else
user_id_list := JSONArr.GetValue<string>('[' + IntToStr(i) + '].message.user_id');
end;
end;
{
"response": {
"count": 3,
"items": [
{
"message": {
"user_id": 1,
"body": "Текст body"
}
},
{
"message": {
"user_id": 2,
"body": "Текст body"
}
},
{
"message": {
"user_id": 3,
"body": "Текст body"
}
}
]
}
}
(и ещё мне от туда по мимо id нужно выдрать
body)
теперь мне нужно со списком id (
user_id_list) (1,2,3) сделать запрос на другую страницу, там я получаю еще 3 текстовых поля для каждого id:
{
"response": [
{
"id": 1,
"first_name": "Текст1",
"last_name": "Текст1",
"photo_50": "http"
},
{
"id": 2,
"first_name": "Текст2",
"last_name": "Текст2",
"photo_50": "http"
},
{
"id": 3,
"first_name": "Текст3",
"last_name": "Текст3",
"photo_50": "http"
}
]
}
и теперь мне нужно связать все эти данные полученные на 2-х страницах вывести в memo, т.е. чтобы получилось:
id:1, Текст body, Текст1 Текст1, http
id:2, Текст body, Текст2 Текст2, http
id:3, Текст body, Текст33 Текст3, http
Как это лучше и правильней сделать? Надеюсь понятно объяснил.