0

Tenho esses dados JSON que retorna de uma consulta webservice:

[{
    "id":"1",
    "usuario":"teste",
    "senha":"teste",
    "chave":"d59876jh",
    "email":"[email protected]"
}]

Preciso popular os Itens de um ListBox com eles.

Alguém sabe como fazer?

8
  • Só para eu entender melhor, você está consumindo os dados de um WebService, precisa popular o ListBox no Mobile com o retorno dos dados do WebService, você já fez a conexão Mobile via WebService?... se sim, sugiro pesquisar sobre RESTClient, RESTResponse e RESTRequest que são os componentes para receber esses dados. 7/11/2016 às 11:56
  • @JeffersonRudolf eu estou usando apenas um IdHTTP que faz uma consulta via GET e retorna esse JSON pois dessa forma eu nao utilizo REST apenas o retorno de uma URL passada pelo componente pois meu webservice é php mysql hospedado normalmente como um site. 7/11/2016 às 17:06
  • Primeiro passo é encontrar um Framework para serializar/deserializar o JSON: Eu sugiro o bitbucket.org/soundvibe/delphi-oop/src. Assim que tiver decidido por algum, seguimos com os exemplos. 7/11/2016 às 18:08
  • @VictorZanella eu ja criei o webservice php ele responde direitinho da forma como coloquei o JSON acima. Testei em um TMemo e tudo certinho com os pares etc. To apanhando na parte mais fácil teoricamente que seria popular o listBox com os dados obtidos. 8/11/2016 às 23:39
  • O que eu quis dizer, é que é mais fácil, você achar uma lib para ler o JSON no Delphi. É muito mais fácil voce deserializar o JSON em uma lista de objetos, e trabalhar com ela, do que ficar percorrendo uma string. 9/11/2016 às 10:27

1 Resposta 1

-1

Se tens o retorno dos dados, vou colocar um exemplo de como popular um ListBox, mas percebi que tem vários dados de um usuário por exemplo, não era melhor usar o ListView?...

var
  i: Integer;
  oListBoxItem: TListBoxItem;
begin
  ListBox1.BeginUpdate;
  for i := 0 to 5-1 do
  begin
    oListBoxItem := TListBoxItem.Create(ListBox1);
    oListBoxItem.Text := 'Stack';
    oListBoxItem.ItemData.Accessory := TListBoxItemData.TAccessory(1);
    ListBox1.AddObject(oListBoxItem);
  end;
  ListBox1.EndUpdate;
end;
0

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .