VB .NET- Simulando DirListBox (Herança)

Você lembra dos controles DirListBox, FileListBox e DriveListBox do Visual Basic 6 ?

Se não lembra espie a figura abaixo e veja que era apenas arrastar e soltar os controles no formulário faze alguns ajustes e pronto.

O controle DirListBox era responsável por exibir as pastas selecionada:

Este exemplo de herança de controles na linguagem VB .NET simula os controles DIrListBox  definindo uma classe que herda de TreeView.

A classe clsDirListBox é um exemplo de classe especializada que utiliza herança e herda todos os métodos , propriedades e eventos do controle TreeView adicionando alguns métodos a ele.

Para começar a usá-lo, você tem que chamar o seu método Open. Isso faz algumas inicializações e permite iniciar a partir de uma determinada pasta/unidade, ou de todas as unidades lógicas, se a entrada for deixada em branco. Quando você quiser, pode usá-lo como um singleton, mas para isso você tem que chamar o método Close para liberá-lo.

Você tem que definir um ImageList com o bitmaps adequados. Os índices de ImageList para os bitmaps devem ser colocados em uma lista enumerada. Se você não quer ter as imagens da árvore de pastas, você tem que remover todo o código que referente ao ImageIndex e SelectedImageIndex.

O exemplo mostra como atualizar parte do foldertree. Para chegar a pasta atualmente selecionada, basta chamar os métodos ou GetDirectory e GetAbsoluteDirectory.
Abaixo vemos o programa em execução:

Para pegar e estudar...: DirListBoxExemplo.zip

Eu sei é apenas VB .NET, mas eu gosto...

"Não se turbe o vosso coração;crede em Deus, crede também em mim." (João 14:1)

Referências:

José Carlos Macoratti