[lmikle]

Сообщение от AlexandrV

Как можно получить индекс самого первого узла где находиться выделенный узел

Рекурсивно идти от TreeView1.Selected до тех пор, пока не получишь Node.Parent = Nil.

Код:

function GetTopNodeIndex(ASelected : TTreeNode) : Integer
var
  Node : TTreeNode;
begin
  Node := ASelected;
  If Node = Nil 
    Then Result := -1
    Else
      Begin
        While Node.Parent <> Nil Do Node := Node.Parent;
        Result := Node.Index;
      End;
end;