Como Fazer uma propriedade de uma classe ser um JsonArray vazio quando o Objeto é convertido em JSON?

Delphi

CRUD - Delphi

11/01/2024

Estou fazendo uma classe que tem alguns campos que vão ser usados para alimentar um JSON para Ser usado em uma API

Esse Json da API tem alguns campos que são um Array vazio

Ex:

{
"campo 1": "valor1",
"campo 2": "valor2",
"ListaDed": []
}

eu faço a conversão do objeto dessa forma:

function TDocumento.CriarJSON : TJSONArray;
begin

Result := TJSONArray.Create;
Result.AddElement(TJson.ObjectToJsonObject(Self));

end;


Porem estou com um problema de na conversão do objeto para json, o campo/valor que era pra ser ( "ListaDed": [] ) ele fica assim:

"listaDed":{
"elements": {
"items": [],
"count": 0,
"arrayManager": {}
},
"owned": true
},

Já testei essa propriedade de várias formas, com TObjectList, TArray, TStringList, TJsonArray, mas ainda sempre quando o objeto é convertido, fica daquela forma

Alguém sabe como posso arrumar isso? preciso que quando o Json for convertido, o campo seja um campo no json que o valor dele é um array vazio.
Guilherme Lima

Guilherme Lima

Curtidas 0
POSTAR