Delphi. Json объекты. Простой пример

В данной статье посмотрим как работать с Json объектами. Напишем простейшее приложение, которое будет парсить json объект из файла test.json, и наоборот создавать json объект из пары строка-значение. Выглядеть оно будет таким образом.

1

Код “накидал” за 5 мин, сильно не форматировал, но суть ясна.

Итак, пусть у нас на сервере лежит простой json объект в файле

test.json

Попробуем сделать простейший парсинг и вытащить отдельно строки и отдельно значения как это показано на рисунке выше.

Парсинг Json объекта

Собственно в этом юните и находится всё самое интересное! Но это тема отдельного поста.

Обработка кнопки Parse

Опишем процедуру FillMemos – в случае обнаружения Json Объектов – заполнит Memo


Создание Json объекта

Итак, мы создали объект из одной пары строка-значение и вывели его в memo3. В дальнейшем этот объект можно либо сохранить в файле filename.json либо сделать-то то ещё полезное и нужное для задачи.

Мы рассмотрели на самом простейшем уровне чтение и запись json объектов. Так называемы парсинг и создание json объектов.

This entry was posted in Delphi, Без рубрики. Bookmark the permalink.