Dbloukupcombobox

[juninhoguitarr]

galera estou fazendo uma consulta, trazendo um resultado de um DBloukupCombobox e eestou colocando assim.

begin

Principal.Qpadrao.SQL.clear;

Principal.Qpadrao.SQL.add('SELECT *');

Principal.Qpadrao.SQL.add('FROM reservas');

Principal.Qpadrao.SQL.add('WHERE COD_CLIENTE ='+DBLookupComboBox1.KeyValue);

Principal.Qpadrao.Open;

end;

mas todos os clientes que eu seleciono no meu DBloukupCombobox dá o mesmo resultado). algúém pode me ajudar?

[Vivendo&Aprendendo]

Olá tenta da seguinte forma:

begin

Principal.Qpadrao.SQL.clear;

Principal.Qpadrao.SQL.add('SELECT *');

Principal.Qpadrao.SQL.add('FROM reservas');

Principal.Qpadrao.SQL.add('WHERE COD_CLIENTE ='+DBLookupComboBox1.TEXT);

Principal.Qpadrao.Open;

end;

Mas não testei

falou

[Progr'amador]

Olá,

faz assim:

Principal.Qpadrao.SQL.clear;

Principal.Qpadrao.SQL.add('SELECT *');

Principal.Qpadrao.SQL.add('FROM reservas');

Principal.Qpadrao.SQL.add('WHERE COD_CLIENTE ='+#39+DBLookupComboBox1.KeyValue+#39+'');

Principal.Qpadrao.Open;

Abs. Progr'amador.