Cadastro com DBTreeView

O componente TreeView, eu geralmente uso da seguinte forma, 1 eu adiciono as opções no menu e na propriedade text eu adiciono um número junto com o texto do menu, no evento duplo click eu faço assim:

procedure TfrmPrincipal.VerificaOpcaoSelecionada;
var
Opcao : string;
NumeroMenu : Integer;
begin
Opcao := Copy(TreeView1.Selected.Text,1,2);
//::::::::::::::::::::::::::::::::::::::::::::::
//a opção ‘Ca’ seria a opção de título que não terá número, ou seja cada titulo que não tem número você vai adicionar as 2 primeiras letras.
if ( Opcao = 'Ca') or (Opcao = ‘Ab’) then
NumeroMenu := 0
else
NumeroMenu := StrToInt(Opcao);

case NumeroMenu of
1 : ShowMessage('abrindo a tela A);
2 : ShowMessage('abrindo a tela B);
3 : ShowMessage('abrindo a tela C);

end;
end;

espero ter ajudado

Boa tarde amigo, obrigado por compartilhar...
A finalidade é criar um cadastro de "Grupos de Produtos", algo parecido com um plano de contas.
Estou utilizando o DBTreeView pois as propriedades permitem visualizar os dados da tabela de maneira muito fácil, sem nenhuma linha de código.
O que gostaria de saber é se existem propriedades ou métodos para controles CRUD? Ou tem que ser na mão (como o pessoal faz com o TreeView)?

Alguém usa o DBTreeView? Ou o JVDBTreeView?