Foros Club Delphi - Como crear un objeto json

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Como crear un objeto json (https://www.clubdelphi.com/foros/showthread.php?t=88282)

Como crear un objeto json

Estimados foristas.

Debo crear el siguiente objeto en formato json obteniendo los datos de una consulta.

Cita:

{
"estudios": [
{
"nombre": "hemograma",
"Fecha": "12/12/12",
"Examenes": [
{
"Nombre": "hemoglobina",
"resultado": "negativo"
}
]
},
{
"nombre": "orina",
"Fecha": "12/12/12",
"Examenes": [
{
"Nombre": "hemograma",
"resultado": "negativo"
}
]
}
]
}

Pueden haber muchos estudios , cada uno con su nombre y fecha, y dentro de cada estudio, pueden haber muchos examenes, tambien cada uno con su nombre y resultado. Mi problema no es la consulta, sino luego de obtenida, recorrerla e ir creando el objeto json, para asi luego devolverlo a una consulta web.

Gracias por vuestra ayuda.

Hola, dale una mirada a la siguiente publicación: http://lfgonzalez.visiblogs.com/2013...t-y-viceversa/

Saludos.

Las versiones nuevas de Delphi traen su propia librería para tratar JSON. Si estás usando una versión antigua puedes usar la librería lkJSON que funciona muy bien.

Gracias tmsanchez y neftali.
Justo lo que estaba necesitando y como uso XE5, me viene de perlas.

Saludos.