Cosmo Verbal

dbtreeview

Plano de contas em treeview
Depois de algum tempo pesquisando a maneira mais fácil de colocar dados provenientes de bancos de dados em forma de Treeview, acabamos encontrando uma solução simples e totalmente acessível, visto que utilizamos a famosa biblioteca JVCL , além de ser um excelente pacote esta biblioteca ainda tem a vantagem de ser open source e gratuita, segundo seus desenvolvedores tem mais de 600 componentes para o Delphi, neste exemplo vamos colocar um pequeno plano de contas em forma de treeview.

Este é um tutorial sucinto voltado para desenvolvedores com o mínimo de experiência em Delphi.

Requisitos :
Delphi 7

JEDI VCL for Delphi, versão 3.0 ou maior

· Baixe o pacote JVCL aqui :
http://surfnet.dl.sourceforge.net/sourceforge/jvcl/JVCL300CompleteJCL195-Build1848.zip

Se o Link Falhar, tente um dos outros mirrors do site.

· Instale o JVCL, é muito fácil, há um instalador no pacote
· Crie a uma tabela em qualquer banco (no exemplo vamos considerar o BDE-Paradox) com a seguinte estrutura, vamos chama-la de Contas:

Ok! Vamos popular a tabela com os seguintes dados:

· Agora vamos desenvolver uma “aplicação” :
· Coloque no form um dataset (dsContas) e uma ttable apontando para tabela acima
· Solte o componente JVDBTreeView – presente na paleta JVDataControls – no form e altere as seguintes propriedades:

· Execute o programa e você deverá ver algo assim:

Agora vamos supor que você queira cadastrar as contas mostrando-as em uma entrada de dados do tipo lookup:

· Insira mais um dataset apontando para a mesma tabela para “listagem” das contas, vamos chama-lo de dsContas2

· Coloque componente JVDBLookupTreeView (também da JVDataControls) no form e altere as propriedades:

· Execute novamente e “abra” o dblookup e você deverá ver algo parecido com a figura abaixo:

É isto, agora é só brincar um pouco com o componente e criar, existem outros componentes comerciais na rede, se este não atender é só procurar por dbtreeview.