cJSON: Выгрузка GROUP с указателем

[Игорь Столяров]

Добрый день !

Подскажите пожалуйста, можно ли как-то выгрузить вот такой кандибобер:

Код: Выделить всё

  Data
G_Address  Group,Type
Town         CString(41)
           end
gAddress   Group(G_Address).
                
gMen       Group
Name         Cstring(41)
Address      &G_Address
!Address      &Group  - Тоже не работает
           end
Root       &cJson  
  Code  
  gAddress.Town = 'Ростов-на-Дону'
  
  gMen.Name     = 'Игорь'  
  gMen.Address &= gAddress
  
  Root &= Json::CreateObject(gMen)
  If Not Root &= Null     
     Message(Root.ToString(True))
     SetClipBoard(Root.ToString(True))
     Root.Delete()
  end   

Вроде бы ничего криминального, но результат:

Код: Выделить всё

{
	"name":	"Игорь",
	"address":	"€P\u001F\u0003(h_d)\u0000\u0000\u0000"
}

Если бы gAddress был вложенным списком QUEUE или строкой - то всё с ним понятно.
А вот как указать, что это адрес вложенной группы ?

Спасибо !

P/S: В боевом проекте у меня внутри G_Address ещё указатели на вложенные списки ...

[Дед Пахом]

А вот как указать, что это адрес вложенной группы ?

Никак.

[Игорь Столяров]

Понял ! Настоящие герои всегда идут в обход !
Работаем по вновь утверждённому плану "Б".