26.12.2020, 12:47
|
|
Администратор
|
|
Регистрация: 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;
|