DBComboBox
Como faço para que o dbcombobox, ao ser clicado, mostre todos os clientes cadastrados e suas respectivas informações (na verdade, mostrando uma tela de pesquisa de registros)? E quando um registro for selecionado, mostre seus dados nos demais campos da tela?
Sgrandini
Curtidas 0
Respostas
Alexespina
13/02/2006
olá amigo...
vc pode usar o DBLookupComboBox, para isso crie uma Query com os dados a serem mostrados, logo em segiuda crie um dataSource e set para esta Query.Na propriedade do DBLookupComboBox KeyField coloque a chave do field que vc vai usar, e no listSource set o local que vc criou seu dataset no caso>> frmS018Dm.DsCliCidade. No evento OnShow use este comando.
with frmS018Dm.QryCliCidade, frmS018Dm.QryCliCidade.SQL do
begin
close;
Open;
end;
DBLookupComboBox1.ListSource := frmS018Dm.DsCliCidade;
vc pode usar o DBLookupComboBox, para isso crie uma Query com os dados a serem mostrados, logo em segiuda crie um dataSource e set para esta Query.Na propriedade do DBLookupComboBox KeyField coloque a chave do field que vc vai usar, e no listSource set o local que vc criou seu dataset no caso>> frmS018Dm.DsCliCidade. No evento OnShow use este comando.
with frmS018Dm.QryCliCidade, frmS018Dm.QryCliCidade.SQL do
begin
close;
Open;
end;
DBLookupComboBox1.ListSource := frmS018Dm.DsCliCidade;
GOSTEI 0
Aroldo Zanela
13/02/2006
Como faço para que o dbcombobox, ao ser clicado, mostre todos os clientes cadastrados e suas respectivas informações (na verdade, mostrando uma tela de pesquisa de registros)? E quando um registro for selecionado, mostre seus dados nos demais campos da tela?
Colega,
Quando você rola o cursor no componente dbComboBox, o deslocamento é efetuado sobre o resultset ao qual o mesmo está ligado. Partindo deste princípio, é desenhar o formulário que deseja.
Ficou claro?
GOSTEI 0