Ler objeto json[URGENTEEE]

Delphi

JSON

25/10/2017

Olá, preciso ler cada objeto desse json, porém não estou conseguindo, so consigo se caso fosse um array de objetos(WTF??).
Delphi 7 e biblioteca TLKJSON
{
"conclusao":
{
"id_conclusao":1,
"conclusao_tipo":"1",
"usuario":"1080",
"pedido":"132",
"estado":"Espera."
}
}
Tiago

Tiago

Curtidas 0

Melhor post

Tiago

Tiago

25/10/2017

depois de muito teste, eu consegui. Para quem tiver a mesma duvida, segue a resolução

jsonObj := TlkJSON.parseText(UTF8Encode(strList.Text)) as TlkJSONobject;

jsonObj := jsonObj.Field[''conclusao''] as TlkJSONobject;

Edit1.Text := jsonObj.NameOf[0];
Edit2.Text := jsonObj.FieldByIndex[0].Value;
GOSTEI 1
POSTAR