Obter Name de um Json.

Question

OI...Sou meio novo aqui em Delphi tbm...Gostaria de saber se a algum modo de obter o name do json, tipo guardar ele em uma string, so o name mesmo....No delphi FMX...Abrss......

Fernando Ito · Answer

Falae Fernando,segue um exemplo de como você pode fazer isso:var  jsonObj, jSubObj: TJSONObject;  jv: TJSONValue;begin  jsonObj := TJSONObject.ParseJSONValue(TEncoding.ASCII.GetBytes(Memo1.Text), 0)    as TJSONObject;   Memo1.Lines.Clear;   jv := jsonobj.Get(error).JsonValue;  jsubObj := jv as TJSONObject;   jv := jsubObj.Get(message).JsonValue;  jsubObj := jv as TJSONObject;   jv := jsubObj.Get(value).JsonValue;   ShowMessage(jv.Value);end;Um abraço,ITO...

Fernando · Answer

Obrigado pela resposta, vou testa.Estou em outros projetos...Mas muito obrigado mesmo....