Fórum DBLookupComboBox como relacionar com outro. #224061
02/04/2004
0
Caros colegas,
Gostaria de saber como faco para relacionar um DBLookupComboBox com outro.
Tenho um banco de dados access com as seguintes tabelas carro e modelos,
no DBLookupComboBox1 vai aparecer o carro(gol, uno, escort, etc.) e no outro modelos onde mim mostrara os modelos dos carros de acordo com o nome do carro, ex uno so mostrar o modelo do uno, escort so mostrar o modelo do escort e assim por diante.
Alguem pode mim ajudar.
desde ja muito grato.
Roberto Paraiso.
Gostaria de saber como faco para relacionar um DBLookupComboBox com outro.
Tenho um banco de dados access com as seguintes tabelas carro e modelos,
no DBLookupComboBox1 vai aparecer o carro(gol, uno, escort, etc.) e no outro modelos onde mim mostrara os modelos dos carros de acordo com o nome do carro, ex uno so mostrar o modelo do uno, escort so mostrar o modelo do escort e assim por diante.
Alguem pode mim ajudar.
desde ja muito grato.
Roberto Paraiso.
Roberto Paraiso
Curtir tópico
+ 0
Responder
Posts
03/04/2004
Adilsond
Voce deve fazer uma ligação Master Detail com as suas Tables/Querys. Com isto ao escolher uma marca, a sua tabela detail lhe mostrará apenas os modelos correspondentes.
Responder
Gostei + 0
03/04/2004
Roberto Paraiso
deu no mesmo, sou novo no delphi, teria como esplicar melhor.
Roberto Paraiso.
Roberto Paraiso.
Responder
Gostei + 0
05/04/2004
Adilsond
Com Tables:
tblVeiculo
dtsVeiculo
-DataSet = tblVeiculo
tblModelo
-MasterSource = dtsVeiculo
-MasterFields = Aqui voce coloca o link entre as tabelas
Com Querys:
qryVeiculo
-SQL = ´select cd_veiculo, ds_veiculo from veiculo order by ds_veiculo
dtsVeiculo
-DataSet = qryVeiculo
qryModelo
-MasterSource = dtsVeiculo
-SQL = ´select cd_modelo, ds_modelo from modelo where cd_veiculo = :cd_veiculo order by ds_modelo
onde :cd_veiculo = ´:´ quer dizer que é um parâmetro externo e o ´cd_veiculo´ é o campo que virá do dataset que está ligado via o MAaterSource
tblVeiculo
dtsVeiculo
-DataSet = tblVeiculo
tblModelo
-MasterSource = dtsVeiculo
-MasterFields = Aqui voce coloca o link entre as tabelas
Com Querys:
qryVeiculo
-SQL = ´select cd_veiculo, ds_veiculo from veiculo order by ds_veiculo
dtsVeiculo
-DataSet = qryVeiculo
qryModelo
-MasterSource = dtsVeiculo
-SQL = ´select cd_modelo, ds_modelo from modelo where cd_veiculo = :cd_veiculo order by ds_modelo
onde :cd_veiculo = ´:´ quer dizer que é um parâmetro externo e o ´cd_veiculo´ é o campo que virá do dataset que está ligado via o MAaterSource
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)