Использование двух TreeView

[Librarian]

Всем доброго дня!
Суть проблемы в следующем:
Имеются два TreeView аналогичные по структуре (но не по содержимому), как сделать так чтобы при выделении узла или элемента в одном из них указатель на втором переходил на тот-же узел (элемент) с раскрытием узла если это необходимо.
Решения не нашел в форумах.

[Аватар]

Имеются два TreeView аналогичные по структуре (но не по содержимому),

при выделении узла или элемента в одном из них указатель на втором переходил на тот-же узел (элемент)

Чем структура отличается от содержимого и как переходить на тот же узел, если содержимое различно?

[Librarian]

структура для примера:
элемент0
элемент1
подэлемент0
подэлемент1
элемент2
элемент3
подэлемент0
подэлемент1
элемент4
у обоих TreeView структура будет одинаковая, содержимое, то-есть текст элементов разный.
необходимо чтобы при клике на скажем элемент3 во втором TreeView указатель переходил на тот-же элемент3.
казалось бы простое действие которое должно работать

TreeView2.Selected:=TreeView1.Selected;

никак не реагирует.

[Аватар]

TreeView2.Selected:=TreeView1.Selec ted;

Так не будет и нельзя так делать. Если по структуре полностью идентичны и создавались в одной последовательности узлы, то можно так

procedure TForm1.TreeView1Change(Sender: TObject; Node: TTreeNode);
begin
  TreeView2.Selected:=TreeView2.Items[TreeView1.Selected.AbsoluteIndex];
end;

[Librarian]

Спасибо тебе бог программирования, всё работает отлично.