Listar Contas dos Bancos em uma DBLookUpCombobox em outra???
Tenho duas DBLookUpCombobox.
A primeira Lista o Nome de Todos os Bancos. Ex:
DBLookUpComboboxBancos possui:
´Bradesco´
´Banco do Brasil´
´ITAU´
E passa o Codigo do Banco!
A segunda Lista o Nº das contas de Todos os Bancos. Ex:
DBLookUpComboboxNumeroConta possui:
´12345-6´
´44445-6´
´99999-0´
Que possui o Codigo do Banco em cada registro!
Só que no exemplo, as contas do Bradesco são:
´12345-6´
´44445-6´
E a conta do ITAU é:
´99999-0´
Alguém sabe como utilizar as Propriedades de MasterSource e MasterFiels para a segunda ´DBLookUpComboboxNumeroConta´ liste somente as contas do Banco selecionado na primeira ´DBLookUpComboboxBancos´???
Espero uma resposta.
Obrigado.
A primeira Lista o Nome de Todos os Bancos. Ex:
DBLookUpComboboxBancos possui:
´Bradesco´
´Banco do Brasil´
´ITAU´
E passa o Codigo do Banco!
A segunda Lista o Nº das contas de Todos os Bancos. Ex:
DBLookUpComboboxNumeroConta possui:
´12345-6´
´44445-6´
´99999-0´
Que possui o Codigo do Banco em cada registro!
Só que no exemplo, as contas do Bradesco são:
´12345-6´
´44445-6´
E a conta do ITAU é:
´99999-0´
Alguém sabe como utilizar as Propriedades de MasterSource e MasterFiels para a segunda ´DBLookUpComboboxNumeroConta´ liste somente as contas do Banco selecionado na primeira ´DBLookUpComboboxBancos´???
Espero uma resposta.
Obrigado.
A24
Curtidas 0
Respostas
Anonymous
10/04/2003
Eu uso TQuery e não TTable. No seu exmplo em questão eu teria os SQLs abaixo para as querys:
Query1.Text := ´SELECT * FROM TB_BANCOS´;
Query1.Open;
Query2.Text := ´SELECT * FROM TB_CONTAS WHERE CODBANCO=:CODBANCO´;
Query2.ParamByName(´CODBANCO´).AsString := Query1.FieldByName(´CODBANCO´).AsString;
Query2.Open;
O fragmento de código da query2 eu colocaria ou no evento ONCHANGE do DBLookupCombo de Bancos ou no evento ONSCROLL da Query1 (ou seja, quando se mudasse de registro).
Não sei se ajuda...
Query1.Text := ´SELECT * FROM TB_BANCOS´;
Query1.Open;
Query2.Text := ´SELECT * FROM TB_CONTAS WHERE CODBANCO=:CODBANCO´;
Query2.ParamByName(´CODBANCO´).AsString := Query1.FieldByName(´CODBANCO´).AsString;
Query2.Open;
O fragmento de código da query2 eu colocaria ou no evento ONCHANGE do DBLookupCombo de Bancos ou no evento ONSCROLL da Query1 (ou seja, quando se mudasse de registro).
Não sei se ajuda...
GOSTEI 0