bssat
Пользователи-
Постов
11 -
Зарегистрирован
-
Посещение
Весь контент bssat
-
Спасибо большое. Буду пробовать.
-
Ну вот джейсон. [{"quantity":null,"price":null,"title":"Аспирин C шип. таб. №10(Байер)","id":42636,"image":null},{"quantity":null,"price":null,"title":"Аспирин комплекс пак. №10(Байер)","id":42641,"image":null},{"quantity":null,"price":null,"title":"Аспирин кардио таб. п/о100мг №56 (Байер РХ)","id":42639,"image":null},{"quantity":null,"price":null,"title":"Аспирин Экспресс шип. таб.0.5г №12 (Байер)","id":42637,"image":null},{"quantity":null,"price":null,"title":"Аспирин кардио таб. п/о300мг №20 (Байер РХ)","id":42640,"image":null},{"quantity":null,"price":null,"title":"Аспирин кардио таб. п/о100мг №28 (Байер РХ)","id":42638,"image":null}] Дальше его делаю так JSValue := TJSONObject.ParseJSONValue(JSText) as TJSONValue; if Assigned(JSValue) then begin ... И так далее. Так вот JSValue не становится чем-то. Всегда nil. Я пробовал программно оборачивать все в еще одни фигурные скобки ({}), результат тот же.
-
Это да. Но сначала его надо сделать объектом при Парсинга, потом из объекта опять как то массивом. Вот тут я и туплю.
-
Ребят, возник ещё вопрос. А как разбирать Джейсон, если он представляет собой один массив, который состоит из Джейсон объектов? Если его начинаю парcить как объект, он равен nil. Спасибо.
-
Дважды клик по стайбуку, там создайте стиль, назовите его как вам угодно, потом стилю кнопки это имя ставьте.
-
Спасибо, ZuBy. Примерно так и сделал, через Pairs. Просто изначально затупил, апгрейдил одно, а добавлял в другое. Ничего не появлялось.
-
А если стандартными методами? К тому же, как из джейсона сделать суперобжект?
-
Господа, прошу не пинать, что-то совсем зарапортовался. Здесь в соседней ветке обсуждался разбор массива, но там он состоял из пар - ключ:значение. А если массив типа такого? {"desc":"Описания...","otdel":["1","12","300"],"manufacturer":"ООО \"Привет\""} Мне нужно получить значения массива otdel. Как здесь быть? Понимаю, что решение простое, но говорю, ка отрубило... desc и manufacturer - тут просто: JS := TJSONObject.ParseJSONValue(JSONText) as TJSONObject; if Assigned(JS) then begin // Заполняем Описание товара desc := WithoutDQuotes(JS.GetValue('desc').ToString); manufacturer := WithoutDQuotes(JS.GetValue('manufacturer').ToString); memOpisanie.Lines.Clear; memOpisanie.Lines.Add('Производитель: ' + manufacturer); memOpisanie.Lines.Add('Описание товара: ' + desc); ... Как быть с массивом? Заранее благодарен за адекватный ответ.
-
Кто то ломится еще в твою базу. А вообще есть классный компонент unidac называется. У меня ни разу проблем с ним не возникало. Полный директ и скорость получше чем у стандартных. Не буду заниматься киберсквоттингом, на просторах инета найдешь легко.
-
Дружище, тебе имеется подсказка в тексте ошибки. Flush-hosts увеличь в настройках мускля и все.