INTERLIGAR CADASTRO DE GRUPO E SUBGRUPO

Delphi

22/07/2022

Alguém sabe dizer se é possível eu interligar um cadastro de um subgrupo ao grupo?

criei um form grupo com uma dbgred para o subgrupo. A ideia seria: ao selecionar o grupo, já aparecer os subgrupos interligado na dbgrid e ao abrir o cadastro do grupo conseguir cadastrar mais subgrupos dentro da dbgrid.

Só preciso de uma luz, por gentileza. Tipo, ah vc pesquisa sobre isso que é através deste componente ou através deste código vc vai conseguir algo do tipo. Assim conseguiria chegar ao resultado. Pois já busquei de várias formas na web e não achei nada do tipo.
Fabio Palagar

Fabio Palagar

Curtidas 0

Melhor post

Roberto Henrique

Roberto Henrique

24/07/2022

Eu utilizo o componente TADQuery FireDAC.
Você vai precisar de duas querys, uma para os Grupos e outra para os Subgrupos.
Na query do subgrupo procure pela propriedade MasterSource e MasterFields, no primeiro você informa o Data Source que está linkado a query dos Grupos e no segundo você informa a chave estrangeira presente no Subgrupo que diz respeito aos Grupos (caso seja chave composta você pode separar por ponto e vírgula ';').
Dessa forma quando o usuário trocar de linha no grid de Grupos será feito o filtro também no grid de Subgrupos.

Exemplo:
Tabela GRUPO: CD_GRUPO (PK), DS_GRUPO
Tabela SUBGRUPO: CD_SUBGRUPO (PK), CD_GRUPO (FK), DS_SUBGRUPO
No MasterFields colocar: CD_GRUPO.

Tabela GRUPO: NR_SEQUENCIA (PK), CD_GRUPO (PK), DS_GRUPO
Tabela SUBGRUPO: CD_SUBGRUPO (PK), NR_SEQUENCIA (FK), CD_GRUPO (FK), DS_SUBGRUPO
No MasterFields colocar: NR_SEQUENCIA;CD_GRUPO.
GOSTEI 1

Mais Respostas

Fabio Palagar

Fabio Palagar

22/07/2022

Roberto, muito obrigado pela ajuda. Deu super certo aqui.
GOSTEI 0
POSTAR