[*Caro*]

Muchas Gracias Gydba, roman y Lepe. Me funciono de la siguiente forma

En el evento Onclick del TreeView

Código Delphi [-]
         nivel:=TreeView.Items[TreeView.Selected.AbsoluteIndex].Level;