![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 09.09.2013
Сообщений: 21
|
![]()
в postgres sql есть такой тип данных json. Как мне из делфи передать json в процедуру БД в Tquery?
cоздаю так: var FJSONObject:TJSONObject; FJSONArray:TJSONArray; MainJSONObject:TJSONObject; FJSONArray:=TJSONArray.Create; FJSONObject:=TJSONObject.Create; FJSONObject.AddPair('type','FrontDi sconnect'); FJSONObject.AddPair('error','1'); FJSONObject.AddPair('cam','2'); FJSONObject.AddPair('hdd','-1'); FJSONObject.AddPair('ip','172.16.11 .94'); FJSONObject.AddPair('ip',datetostr( now)); FJSONArray.AddElement(FJSONObject); FJSONObject:=TJSONObject.Create; FJSONObject.AddPair('type','FrontDi sconnect'); FJSONObject.AddPair('error','1'); FJSONObject.AddPair('cam','2'); FJSONObject.AddPair('hdd','-1'); FJSONObject.AddPair('ip','172.16.11 .95'); FJSONObject.AddPair('ip',datetostr( now)); FJSONArray.AddElement(FJSONObject); MainJSONObject:=TJSONObject.Create; MainJSONObject.AddPair('Array',FJSO NArray); |
![]() |
![]() |
![]() |
#2 | ||
Участник клуба
Регистрация: 10.08.2010
Сообщений: 1,385
|
![]() Цитата:
Цитата:
1) Не выжу вызов процедур из БД если он есть вобше 2) Tquery вобше не применяется ваши коде
E_MAIL: rijgvina7@yahoo.com
|
||
![]() |
![]() |
![]() |
Опции темы | Поиск в этой теме |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
JSON из JS | vinniepooh | JavaScript, Ajax | 10 | 01.08.2016 17:16 |
Работа с JSON (System.JSON) | nibufep | Общие вопросы Delphi | 3 | 19.04.2016 18:21 |
JSON Exception [org.apache.json] | spectrum988 | Помощь студентам | 3 | 11.12.2015 09:25 |
C++ JSON | qip2005 | Visual C++ | 2 | 05.11.2012 19:48 |
Qt + Json | Lindemann66 | Qt и кроссплатформенное программирование С/С++ | 0 | 18.08.2011 15:26 |