[Resolvido]Preencher um TreeView com resultado de um consulta ou tabela.

Como não tem elementos suficientes para distinguir os relacionamentos.. ao se altersr dados.. algumas das tabelas exibirão registros duplicados..

Não tem parâmetros sufuciente de diferenciação de registros pois o relacionamento entre as tabelas Desenho e DesenhoRef... é muito Vago...

Estão relacionadas pelo Campo código na tabela Desenho.. e os dados neste campos não são únicos.

Sinto muito.

Mais tarde tentarei fazer diretamente baseado nas tabelas...

Cumprimentos.

Este é exatamente o problema Piloto.

Eu posso ter registros iguais o vai mudar é apenas o ID do registro e o Fornecedor.

No sistema eu tenho produtos com o mesmo código porém com fornecedores diferentes, entendeu.





Aqui é que esta o problema, o sistema já é assim e para mudar impactaria todo o sistema.

No exemplo do nosso amigo Alexandre nos tópicos acima, ele consegue listar tudo porém não está agrupando ou seja que aparece em um nó aparece no outro.

Justamente isto.. não tem elementos para diferenciar..

Ok, vou fazer um teste modificando a rotinha e tentar criar um identificador com sql.
Nao sei vai dar certo.

Nao consegui pessoal, já fiz tudo que podia.
Nao funciona.
Piloto no seu codigo se tiver 2 registros iguais porem com fornecedores diferentes, da o erro de key duplicado.

Alexandre no seu código ele lista tudo e nao consegui fazer ele agrupar os dados conforme as imagens que postei.

Olha nunca peguei um problema tao complicado para resolver igual a este.

Se conseguirem por favor me ajudem.

Abraços.

A tree tem que iniciar peloa classe?

Não pode iniciar pelo fornecedor?


Ja até tentei inserir as informações em tabelas separadamentes.. mas está complicado.. não tem parametros..

Já estou a desisitir..

Cumprimentos.

E eu sem entender a mecânica...

Grande Alexandre... Vou te mandar um modelo que fiz tentando inserir as informações em tabelas..

Mesmo assim não há elementos para critérios suficientes...

Cumprimentos.

No entanto eu creio será mais fácil se começar pelo nome do fornecedor e não do tipo de processo

Cumprimentos.

Rapaz.. Me surgiu uma ideia...

As informações constantes nas 3 tabelas...Não poderiam ser fixas?

Ai fariamos 3 tabelas.. relacionariamos.. e depois apenas inserimos o ultimo no baseado na consulta Resultado...


TblClasse
TblFornecedor
TblDescricao...


Se voce sabe o nome de todas as classes, fornecedores e descricao..

coloca em tabelas..
adicionaria no 4 no apenas o resultado.


Pense nisso pois ja tentei de tudo e não opbtive sucesso..
não há critérios de chaves primárias para isso..

LEmbre-se .. a treeView funciona adicionando nós conforme tabelas e relacionamentos e suas devidas chaves primária..

Infelizmente não tem parametros pra isso.

Cumprimentos.

É muito dificil para mim falar isto... Mas Desisto...

Eu creio que deve comecar pelo fornecedor e não pela classe...

Sinto Muito amigo.. Eu realmente tentei.


Cumprimentos.    

Olá amigos, estive analisando as ideias e acho que a do Piloto pode funcionar.

No sistema existe uma tela de cadastro para a tbl desenhos, no entanto neste tela os campos de Classe, Fornecedor e descrição, são listados com dados das tabelas do sistema, ou seja eu tenho uma tbl para Classe, Fornecedor e Desrição.

Estou postando uma versão com as tabelas.

Neste Piloto sua ideia pode funcionar.

Eu só nâo sei como programar, mas abstrai ai sim.

1. se basear na consulta resultado para filtrar as Os fornecdores, as classe e as descrições de suas respectivs tabelas, isso porque na consulta resultado será filtrado pelo produto e já sera o resultado que quero na treeview.

2. Filtrado as classe fornecedores e descrição, preenche o treeview com essas informações, depois se possivel era apenas inserir o nome do arquivo a revisão e a data.

O que voces acham?

Minha abstracao,
1 Temos a consulta resultado, pois eu já terei todos os dados que preciso.
2 Usamos a consultada resultado para filtras as classes, fornecedor, e descricao e preenche todos os nos do treeview
3 Com treeview preenchido e ultimo passo insere o nome do arquivo, a revisao e a data.

OK, neste arquivo que postei ja tem as tabelas.

Qual ideia?  Ja tive tantas..

Meu cérebro já ja parecendo um emaranhado.. hehehe

Agora se realmente nao tiver jeito, posso tentar modificar a interpretacao do resultado da treeview e comecar a listar pelo fornecedor.

Porem é possivel deixar expandido apenas o nó fornecedor quando a treeview for preenchida?
Assim facilitara a visualizacao.

Abracos.

Sua ideia por tabelas.
Rssss.

Oi pessoal blz.
Sem chance mesmo para resolver este problema.

Eu tentei fazer com as ideias acima, mas nao consegui resolver.

Estou triste, este problema me pegou de jeito.

Abs.

Logo mais tentarei novamente.

Cumprimentos.

OK amigos.
Vou esperar seu veredicto final.
Afffff este problema foi animal hein.

Tem duas descricões:

DESENHO DE FABRICAÇÀO e PROCESSO APROVADO..

Pode correr estes dois casos tanto pra produto como para  desenvolvimento de produto?

Cumprimentos.

Ola Piloto.
Sim pode ocorrer. Posso ter os doi casos.
Obrigado, qualquer duvida aqui.

Vamos lá... Creio que consegui sua melhor opção...

A única questão é que no terceiro nó aparecerá uma descrição para cada desenho.. Mas as informações ficam corretas..

Primeiramente foram criadas tuas tabelas:

tblClasse:
Ficam armazenados os tipos de classe

tblClasse:
Ficam armazenados o fornecedor e suas classes

No evento ao abrir do formulário de treeView, código para adicionar  na tblFornecedores.. os fornecedores existentes na tabela fornecedores e os tipos de classe, para que isso? se porventura houver novos fornecedores na tabela fornecedores, o cadastra na tblFornecedores que carregará a treeView

Sub CriaDados()
Dim rsFornecedor As DAO.Recordset
Dim X As Integer
Dim StrClasse As String
Set rsFornecedor = CurrentDb.OpenRecordset("Fornecedores")

Do While Not rsFornecedor.EOF
    For X = 2 To 5
        StrClasse = DLookup("Classe", "tblClasse", "ID_Classe = " & X & "")
        If DCount("*", "tblFornecedor", "Classe_ID = " & X & "  And Fornecedor = '" & rsFornecedor!Apelido & "'") = 0 Then
            'Insere na tblFonecedor as respectivas classes e nome do fornecedor
            CurrentDb.Execute "INSERT INTO tblFornecedor (Classe_ID,Classe,Fornecedor) Values (""" & X & """,""" & StrClasse & """,""" & rsFornecedor!Apelido & """)"
        End If
    Next X
rsFornecedor.MoveNext
Loop
End Sub

Os demais códigos fda treewView utilizam para:

1 Nó >> tblClasse
2 Nó >> tblFornecedores
3 Nó >> Desenhos (Filtrado pela classe e nome do fornecedor da tblFornecedores)
4 Nó >> Desenhos (Fltrado pelo id da tabela Desenhos)


Na classe (Desenvolvimento de Produto, Produto, Embalagem, Folha de processo) se o fornecedor não tiver arquivos.. não será adicionado o próximo nó

Amigo, postei uma arquivo explicando mais claramente o problema.

No seu ultimo arquivo que vc postou eu tentei fazer umas modificações mais cai novamente na chave duplicada.

Sei que vc já explicou , porém no arquivo que mostro a estrutura voce verá pq eu estou insistindo, eu não tenho outra altenativa.

Acho este foi o problema mais dificil que pá peguei..

No seu código eu tentei modificar as consultas sql para tntar agrupar os resultados, não consegu, funcionou apenas para a prmeira classe.

Abraços.

O maior problema aqui.. é que você coloca fragmentos de dados.. ao faço conforme os dados que me envia..
Ai modifica os dados.. e dá erro..

Se não mandar os dados completos não tenho como ajudá-lo mais..
Está a me fazer trabalhar em vão.

Cumprimentos.

Desculpe, é para faciltar eu havia ja compilado a consulta resultado, ja com todos os dados.
Neste ultimo arquivo que postei ja possui todas as tabelas referente ao resultado da treeview.
Me desculpe nao sou muito bom para explicar.

No ppt ficou mais facil entender ?
Não postei o banco todo pq ficaria muito grande o arquivo.
Precisa de mais alguma informacao que nao postei?

Vc explica muito bem, eu ja tenho dificuldade em explicar, sou meio afobado.

Já tentei de várias formas.. e creio que começando pela classe não vai dar..

Tentei inclusive inserir informacoes em todas as tabelas.. mas se sucesso.

Deves iniciar a tree pelo Fornecedor...

Veja em apenas 3 nós se lhe serve


Cumprimentos.

Estou estudando seu código, estou tentando fazer não aparecer todas as classes?

Digo isso porque o produto 24050 possui apenas as classes Desenvolvimento de Produtos e Produto e quando implantar este código no sistema, eu irei filtar por produto.

Preciso deixar aparecendo apenas as classes e os fornecedores do produto e não todos as classes cadastrada nas tabelas.

Dentro das classes ele repete os fornecedores, tem como tirar esse nó se ele não tiver dados para exibir.

Ta quase lá, voce tem sido um grande parceiro.

Não vou esquecer disto.

Obrigado.

O Que dá pra fazer é este exemplo com 3 nós ou este:


É isso amigo.. doutra forma com esses dados não tem jeito

Cumprimentos.

Olá amigos.
Depois de muito cérebro queimado, e ajuda do Piloto e Alexandre.
Consegui resolver este problema.
No código que o Alexandre postou eu alterei os Sql filtrando as classes e fornecedor etc.
E simplesmente ficou perfeito extamente o que precisava.
Sem vocês não teria conseguido.
Fantástico este fórum.
Parabéns a todos.

Problema resolvido.

Poste então  exemplo com o resultado final.

Cumprimentos.

Segue o resultado final do projeto que trabalhamos muito.

Para funcionar extraia toda a pasta do arquivo.zip.

Os dados exibidos no Treeview são os da consulta resultado, e segue uma arvore de estrutura, Classe, Fornecedor, Descrição e arquivo.

As imagens são carregadas conforme os tipos de arquivo e estão na pasta icons.

Os códigos fontes estão bem explicados.

Obrigado pela ajuda de todos, sem vocês eu não teria conseguido.

Abraços.

O Fórum agradece o Retorno.