Listar Dados em 2 Combo Box

Question

Ol�, mais uma vez estou com algumas d�vidas e nao sei quais componentes usar.. � o seguinte..Estou fazendo o form de visualiza��o de revistas.. pra eu cadastrar uma revista, eu sou obrigado a ter um g...

Aersoftware · Answer

H�, estou usando um bd em Access, mas pretendo mudar ele pra Firebird logo logo.....

Edilcimar · Answer

coloque N tabelas uma para grupo, outra para sub-grupo, outra para sub-sub-grupo e finalmente uma para as revistas e fa�a relacionamento entre as tabelas, coloque um componente lookup ou outro qualquer (cada um ligado a uma tabela

Aersoftware · Answer

Eu estou fazendo isso.. o problema �, quando eu coloco um LookUp Grupos, e seleciono o Grupo, ele me edita o registro, por isso pensei num combo box, q nao tem liga��o com o Bd, s� lista os nomes.. eu consigo listar todos os grupos num combo, s� nao consigo listar os SubGrupos q estao relacionados �kele grupo... :cry:

Allan Elias Ramos :cry:

Aersoftware · Answer

Eu estive pensando num jeito de fazer isso.. mas nao sei como proceder..

Eu colocando dois combos box normais.. no primeiro eu listo (com o while) todos os nomes dos grupos (a chave prim�ria � o c�digo).. agora, no segundo, como eu fa�o pra listar os nomes dos SubGrupos, cuja as chaves estrangeiras sejam iguais a chave prim�ria do grupo selecionado usando o while? Eu acho q ja fiz algo assim usando o Key Value, ou algo parecido, mas nao lembro agora... :cry:

Allan Elias Ramos :cry:

Aersoftware · Answer

Ol�, tentei um jeito que consegui alguns resultados mais facilmente, mas ainda nao consigo listar os subGrupos.. eu fiz assim..

Colquei 2 LookUp..

No 1� eu botei assim..

ListSource -> DmDados.DsSqlGrupos (Data Module das Querys)
ListField -> NomeGrupo (Campo de Nome do Grupo)
KeyField -> PkCod_Grupo (Campo da Chave Prim�ria)

No 2� eu s� coloquei assim..

ListSource -> DmDados.DsSqlSubGrupos (Data Module das Querys)

Agora, no evento OnCloseUp do Look Up de Grupos, eu botei o seguinte..

  With DmDados.SqlSubGrupos do
    begin
      close; //Fecha o objeto Query
      Sql.Clear; //Limpa o Sql
      Sql.Add(�Select * From TbSubGrupos Where FkCod_Grupo= �+LkUpVerGrupos.KeyField+� Order By NomeSubGrupo�);
    end;

Mas nao funciona de jeito nenhum... quando eu seleciono o grupo, ele nao me lista nada no outro lookup...

Allan Elias Ramos

F�rum Listar Dados em 2 Combo Box #233836