Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 09.10.2018, 02:12
Tech N9ne Tech N9ne вне форума
Прохожий
 
Регистрация: 18.05.2018
Сообщения: 31
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Ух и долго же вы отвечаете)))
решил проблему. опишу, может кому пригодится из начинающих))

delphi 7 + SuperObject

короче нашёл такой сайт, который показывает дерево json.
и уже по нему можно понять, какой именно путь будет
http://jsonviewer.stack.hu
если это объект {} - то в delphi это .O['']
если массив [] - .A['']
перейти к нулевой ячейке массива - .O[0]
текст - .S['']

на сайте, что я привёл выше, копируете туда свой ответ json.
и делаете.


PHP код:
{"response":{"count":4,"items":[{"conversation":{"peer":{"id":46780021,"type":"user","local_id":46780021},"in_read":143911,"out_read":143912,"last_message_id":143912,"unread_count":1,"can_write":{"allowed":true}},"last_message":{"date":1538843837,"from_id":46780021,"id":143912,"out":0,"peer_id":46780021,"text":"ы","conversation_message_id":13879,"fwd_messages":[],"important":false,"random_id":0,"attachments":[],"is_hidden":false}},
{
"conversation":{"peer":{"id":438520578,"type":"user","local_id":438520578},"in_read":143894,"out_read":143458,"last_message_id":143894,"can_write":{"allowed":true}},"last_message":{"date":1538621816,"from_id":80472368,"id":143894,"out":1,"peer_id":438520578,"text":"ццццццццц","conversation_message_id":7,"fwd_messages":[],"important":false,"random_id":22733163,"attachments":[],"is_hidden":false}},{"conversation":{"peer":{"id":3483989,"type":"user","local_id":3483989},"in_read":143892,"out_read":143892,"last_message_id":143892,"can_write":{"allowed":true}},"last_message":{"date":1538596257,"from_id":3483989,"id":143892,"out":0,"peer_id":3483989,"text":"все одеваюсь и выхожу","conversation_message_id":7935,"fwd_messages":[],"important":false,"random_id":0,"attachments":[],"is_hidden":false}},{"conversation":{"peer":{"id":80472368,"type":"user","local_id":80472368},"in_read":142884,"out_read":142884,"last_message_id":142884,"can_write":{"allowed":true}},"last_message":{"date":1530311338,"from_id":80472368,"id":142884,"out":1,"peer_id":80472368,"text":"$00DCDBDA","conversation_message_id":21,"fwd_messages":[],"important":false,"random_id":22732673,"attachments":[],"is_hidden":false}}],"unread_count":1}} 
допустим я хочу получить айди из response-items-conversation-peer-id :
Код:
 var SJson:string;
{......}
{в переменной SJson находится Json}
ShowMessage(SO(SJson).o['response'].A['items'].O[0].O['conversation'].O['peer'].S['id']);

описал подробно как мог, для таких же downов как я ))))

Последний раз редактировалось Tech N9ne, 09.10.2018 в 02:18.
Ответить с цитированием
Этот пользователь сказал Спасибо Tech N9ne за это полезное сообщение:
Gareth (12.02.2022)
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:38.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2026