Array
(
)

resulta de um pesquisa (select) em um combo

Wagnermarrane
   - 09 mar 2006

Bom dia,

Pessoal alguém algum código em que eu consiga colocar em um combobox simples o resultado de uma pesquisa

select * from cidades.

Att,

Wagner


Paullsoftware
   - 09 mar 2006

Claro se entendi bem a sua dúvida faça assim...


#Código

With QyCidades do 
begin
close;
sql.add(´Select * from Cidades´);
prepare;
open;
first;
while not eof do
begin
cbCidades.Items.Clear;//Onde CbCidades seria um TComboBox
cbCidades.Items.Add(QyCidades.FieldByName(´Nome´).AsString);
Next;
end;
end;//With


pronto tente assim! :wink:


Adriano Santos
   - 09 mar 2006


Citação:


#Código

With QyCidades do 
begin
close;
sql.add(´Select * from Cidades´);
prepare;
open;
first;
while not eof do
begin
cbCidades.Items.Clear;//Onde CbCidades seria um TComboBox
cbCidades.Items.Add(QyCidades.FieldByName(´Nome´).AsString);
Next;
end;
end;//With


pronto tente assim! :wink:

Posso corrigir uma coisa no seu código PallSoftware???
#Código

//O cbCidades.Items.Clear; estava dentro do while, limpando o combo toda vez que passe pelo loop.
cbCidades.Items.Clear;//Onde CbCidades seria um TComboBox
while not eof do
begin
cbCidades.Items.Add(QyCidades.FieldByName(´Nome´).AsString);
Next;
end;
:arrow:


Martins
   - 09 mar 2006


Citação:

Citação:


#Código

With QyCidades do 
begin
close;
sql.add(´Select * from Cidades´);
prepare;
open;
first;
while not eof do
begin
cbCidades.Items.Clear;//Onde CbCidades seria um TComboBox
cbCidades.Items.Add(QyCidades.FieldByName(´Nome´).AsString);
Next;
end;
end;//With


pronto tente assim! :wink:

Posso corrigir uma coisa no seu código PallSoftware???
#Código

//O cbCidades.Items.Clear; estava dentro do while, limpando o combo toda vez que passe pelo loop.
cbCidades.Items.Clear;//Onde CbCidades seria um TComboBox
while not eof do
begin
cbCidades.Items.Add(QyCidades.FieldByName(´Nome´).AsString);
Next;
end;
:arrow:

Ótima observação Adriano :wink:

Vejam como um pequeno detalhe na estrutura lógica pode retornar um resultado diferente do esperado.

boa sorte!!


Wagnermarrane
   - 09 mar 2006

pessoal muito obrigado