Fórum Como pesquisar em campos de Lookup #196962
25/11/2003
0
Como pesquisar em campos de Lookup (BD Paradox).
Ja tentei utilizando o campo verdadeiro que contém o ResultList Utilizado no Lookup mas quando eu fecho o form de pesquisa o campo de loockup do Form principal continua em branco.
Como Fazer?
Desde já Agradeço.
Ja tentei utilizando o campo verdadeiro que contém o ResultList Utilizado no Lookup mas quando eu fecho o form de pesquisa o campo de loockup do Form principal continua em branco.
Como Fazer?
Desde já Agradeço.
Scardoso
Curtir tópico
+ 0
Responder
Posts
25/11/2003
Maxsoftware
Na propriedade do listfield , keyfield (Campo produto);
listsource:= dsproduto
procedure T_est.DBLookupComboBox1Click(Sender: TObject);
begin
_dm.ibqpro.close;
_dm.ibqpro.sql.clear;
_dm.ibqpro.sql.add(´select COD_FORN, CODIGO, PRODUTO from PRODUTOS ORDER BY PRODUTO´);
_dm.ibqpro.open;
Espero que ajude....
Max...
listsource:= dsproduto
procedure T_est.DBLookupComboBox1Click(Sender: TObject);
begin
_dm.ibqpro.close;
_dm.ibqpro.sql.clear;
_dm.ibqpro.sql.add(´select COD_FORN, CODIGO, PRODUTO from PRODUTOS ORDER BY PRODUTO´);
_dm.ibqpro.open;
Espero que ajude....
Max...
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)