Jhonas... obrigado pela atenção
Criar o arquivo JSON ok, isso eu faço com o metodo TJson.ObjectToJson()
A questão é que não estou conseguindo alimentar a classe que criei.
TRetContadores = class(TRetornoWS)
private
FOK: Boolean;
FMsg: String;
FContadores: TArray<TContador>;
published
property OK: Boolean read FOK write FOK;
property msg: String read FMsg write FMsg;
property Contadores: TArray<TContador> read FContadores write FContadores;
end;
A Classe acima possui um array (FContadores), como faço para incluir registros nela?
Após usar o TJson.ObjectToJson() o JSON resultante ficaria dessa forma, mas para tal preciso carregar o array:
{
"OK": true,
"msg": "Registros encontrados",
"contadores": [{
"firstName": "John",
"lastName": "Doe"
}, {
"firstName": "Anna",
"lastName": "Smith"
}, {
"firstName": "Peter",
"lastName": "Jones"
}]
}