Delphi lendo json

Question

Oi Pessoal,Come�ando a mexer com json, estou tentando fazer uma aplica��o mobile consumindo, via rest, um webservice. Travei no Json, como fa�o para pegar os dados do Json e colocar em edits...Es...

Crist · Answer

Segue um exemplo, voc� n�o especificou o que est� usando para fazer o aplicativo mobile:
//Obtem o objeto httpRequest para fazer requisi��es AJAX, de acordo com o browser
function getHttpRequest(){
if (window.XMLHttpRequest) {
// Outros browsers
req = new XMLHttpRequest();
}else if (window.ActiveXObject) {
// Internet Explorer
req = new ActiveXObject("Microsoft.XMLHTTP");
}
return req;
}

// Busca endere�o baseado no CEP
function preencheEndereco(event){
event.preventDefault();
var req = getHttpRequest();
var cep = document.querySelector("input[name='CEPEndereco']");
var url = "https://viacep.com.br/ws/" + cep.value + "/json/";
req.onreadystatechange = function(){
if (req.readyState == 4) {
if (req.status == 200) {
// Converte o retorno em JSON para um objeto v�lido
var retorno = JSON.parse(req.responseText);
LogradouroEndereco.value = retorno.logradouro;
BairroEndereco.value =retorno.bairro;
UFEndereco.value = retorno.uf;
CidadeEndereco.value = retorno.localidade;
IDCidadeEndereco.value = retorno.ibge;
}
}
}
req.open("GET", url, true);
req.send(null);
}