IBDataSet... Master/Detail tables... Como configurá-lo???

11/05/2003

0

Colaboradores do fórum...

Venho tentando desenvolver um pequenho aplicativo de cadastro de Empresas e Funcionários e não consigo relacionar duas tabelas, usando o IBDataSet. Eis a estrutura das tabelas no arquivo GDB:

Tabela: Empresa
Campos: IDempresa (Integer, PrimaryKey)
NomeFantasia (Varchar 30)
RazaoSocial (Varchar 40) e etc...

Tabela: Funcionarios
Campos: IDFuncionario (Integer, PrimaryKey)
IDEmpresa (Integer, nor null)
Nome (Varchar 20, not null) e etc...

Estou vinculando o campo IDempresa (tabela Empresa) com IDempresa (tabela Funcionarios) no IBManager. Até aí, o relacionamento funciona...

Já no Delphi7... Criei um DataModule com os seguintes componentes:
01 TIBDataBase (name= IBDbControle)
01 TIBTransaction (name=IBTsControle)
01 TIBDataSet (name=IBdsEmpresa / propriedades Select, Modify, Insert e etc... já configuradas)
01 TDataSource (name=dsEmpresa / DataSet = IBdsEmpresa)
01 TIBDataSet(name=IBdsFuncionario / propriedades Select, Modify, Insert e etc... já configuradas / DataSource = dsEmpresa)
01 TDataSource (name=dsFuncionarios / DataSet= IBdsFuncionario)

Vinculei o DBGrid (Empresa) ao DataSource dsEmpresas e o outro DBGrid (Funcionario) ao DataSource dsFuncionario.

Quando executo o programa, os dados aparecem nas duas tabelas, mas ao selecionar Empresas diferentes no DBGrid, os registros correspondentes no DBGrid Funcionários permanecem inalterados.

Sinceramente, não sei o que posso estar fazendo de errado... Fiz questão de descrever o passo-a-passo seguido p/ que eventualmente alguém possa detectar algum ´furo´ nas minhas configurações. Já tentei algumas soluções colocadas aqui no fórum referentes a ´IBDataSet´ e não deu certo. Caso possam comentar algo sobre isso ou disponibilizar um pequeno exemplo via e-mail, desde já agradeço.

Um abraço

Leonelson (leoback@ig.com.br)


Leoback

Leoback

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar