Carregando ListBox Com uma Query

Question

Quero pegar o item atual do combobox, jogar ele como par�metro em uma consulta sql e apresentar os resultados em um listbox.

COnigo pegar o item atual, colocar ele como par�metro, mas como apresentar o resultado em um listbox, visto que � tudo gerenciado por uma query?

R�mulo Barros · Answer

A�, cara... tudo bem?? Como foi o carnaval em Olinda? Estive a� apenas na segunda-feira e ter�a-feira de carnaval, pois, no centro do Recife, estava �Bombando� tamb�m...

Vamos ao q interessa:

ListBoxResultado.Clear;
Query.First;
While(Not(query.Eof))Do
Begin
   ListBoxResultado.Items.Add(Query.FieldByName(Campo).AsSTring);
   Query.Next;
End;

:twisted: :twisted: :twisted:

Fabio.hc · Answer

Tente assim:Ex:[code:1:9a595370f7]procedure TForm1.Button1Click(Sender: TObject);begin   ListBox1.Clear;   while not Query1.Eof do      begin      ListBox1.Items.Add(Query1CAMPO.Value);      Query1.Next;      end;end;[/code:1:9a595370f7]...

F�rum Carregando ListBox Com uma Query #219609