Показать сообщение отдельно
  #2  
Старый 26.12.2020, 12:47
Аватар для Admin
Admin Admin вне форума
Администратор
 
Регистрация: 03.10.2005
Адрес: Россия, Москва
Сообщения: 1,564
Версия Delphi: Delphi 7
Репутация: выкл
По умолчанию

Цитата:
Сообщение от pikabu
Приветствую, подскажите, как распарсить такой json. Нужно получить значения "name", "value" в "salePrices" которое и значение "href" в "images".
У меня получается только "name" забрать, а во вложенных не получается.

Код:
var JSON: TJSONObject;
begin
   JSON:=TJSONObject.ParseJSONValue(cJsonStr,False, True) as TJSONObject;
   try
     ShowMessage(JSON.Values['firstName'].Value);
     ShowMessage(JSON.Values['lastName'].Value);
   finally
     JSON.Free;
   end;
end;
Ответить с цитированием