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

Delphi Sources



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

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.10.2014, 16:38
Аватар для AmNeZiA
AmNeZiA AmNeZiA вне форума
Прохожий
 
Регистрация: 20.03.2011
Сообщения: 29
Репутация: 10
По умолчанию SuperObject

Всем привет, не могу спарсить данные из memo по Edit'ам.
Использую библиотеку superobject, прошу помощи.
Имеется такой текст в memo:
Код HTML:
Строка №1 Строка №2 Строка №3 Строка №4
Код:
procedure TForm1.Button7Click(Sender: TObject);

var
  obj1: ISuperObject;
   post:tstringlist;
   result:string;
   cJSON:string;
begin
cJSON:=memo1.text;
  obj1 := SO(cJSON);
   edit1.Text:= obj1.S['adventures.list[0].Строка №1'];
  edit2.Text:= obj1.S['adventures.list[1].Строка №2'];
  edit3.Text:= obj1.S['adventures.list[2].Строка №3'];
  edit4.Text:= obj1.S['adventures.list[3].Строка №4'];
end;

Помогите раскинуть по Edit'ам.
Спасибо за помощь!
Ответить с цитированием
 


Delphi Sources

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

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

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

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


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


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

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

ВКонтакте   Facebook   Twitter