Preciso de uma dica para usar dbnavigator com mestre/detalhe
Boa tarde, é o seguinte, gostaria de usar dbnavigator para um cadastro tipo
venda/item vendas, teria alguma forma de usar um dbnavigator pros dois ou teria que ter uma para venda e um para item venda?
Obrigado
venda/item vendas, teria alguma forma de usar um dbnavigator pros dois ou teria que ter uma para venda e um para item venda?
Obrigado
Julian Luis
Curtidas 0
Respostas
Sérgio Andrade.
21/11/2011
para usar dbnavigator com master/detalhe, basta ligar o dbnavigator ao componente datasource que está ligado ao componente referente a tabela master (table,query,clientdataset, etc) e no evendo AfterScroll do mesmo componente fazer a filtragem na tabela detalhe, tendo como condição de filtragem os campos de referência em comum.
EX:
procedure TForm2.IBVendasAfterScroll(DataSet: TDataSet);
begin
with IbItensVenda do
begin
Close;
sql.clear;
sql.add( SELECT * FROM ITENSVENDA WHERE +
SEQVENDA=:SQVD );
PARAMS.ParamByName(SQVD).AsInteger :=IBVendasSeqVd.AsInteger;
Open;
end;
end;
Espero ter ajudado...
EX:
procedure TForm2.IBVendasAfterScroll(DataSet: TDataSet);
begin
with IbItensVenda do
begin
Close;
sql.clear;
sql.add( SELECT * FROM ITENSVENDA WHERE +
SEQVENDA=:SQVD );
PARAMS.ParamByName(SQVD).AsInteger :=IBVendasSeqVd.AsInteger;
Open;
end;
end;
Espero ter ajudado...
GOSTEI 0