DBLookupComboBox como relacionar com outro.
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
Curtidas 0
Respostas
Adilsond
02/04/2004
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.
GOSTEI 0
Roberto Paraiso
02/04/2004
deu no mesmo, sou novo no delphi, teria como esplicar melhor.
Roberto Paraiso.
Roberto Paraiso.
GOSTEI 0
Adilsond
02/04/2004
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
GOSTEI 0