Como identificar o quot;nó paiquot; raiz no Treeview?

Delphi

15/03/2005

Gostaria de saber como identificar o ´nó pai´ de um item, porém não o ´pai´ logo acima do item selecionado, mas sim o ´nó raiz´ do item selecionado.
Exemplo: Suponha que num Treeview existam as seguintes ramificações:
Roupas
     Calças
          Jeans
               Especial
               Simples
          Outros
     Camisas
          Brancas
          Coloridas
Veículos
     Carros
          Passeio
          Transporte
     Motos
          Passeio
          Cross

Agora suponha que esteja selecionado o item ´Simples´, que é filho de ´Jeans´, que é filho de ´Calças´, que é filho de ´Roupas´. Onde: ´Roupas´ é o que eu chamo de ´nó raiz´ do item selecionado no Treeview.

[b:9c33539f77]Minha dúvida é[/b:9c33539f77]: Como saber que ´Roupas´ é o ´nó raiz´ do item ´Simples´?

Valeu!
wbb


Wbb

Wbb

Curtidas 0

Respostas

Kapak

Kapak

15/03/2005

var NoRaiz:TTreeNode;
begin
  if TreeView.Selected = nil then
    Exit;
  NoRaiz := TreeView.Selected;
  While NoRaiz.Parent <> nil do
    NoRaiz := NoRaiz.Parent;
end;



GOSTEI 0
Wbb

Wbb

15/03/2005

Valeu kapak!

Funcionou correto.

wbb


GOSTEI 0
POSTAR