Перебор узлов и их дочерних элементов и изменение данных

Я использую виртуальный древовидный список для delphi 2009. Я создал дерево с такими данными, как:

type
  PTreeData = ^TTreeData;
  TTreeData = record
    FCaption: String;
    FPath: String;
  end;

Я хочу выполнить итерацию по всем элементам, но в определенном порядке. Мне нужно получить первый узел верхнего уровня, а затем перебрать все его дочерние элементы и изменить поле FPath. Когда я закончу с его дочерними элементами, я хочу получить еще один узел верхнего уровня и так далее.

Во-первых, я не знаю, как перебирать узлы верхнего уровня.

Заранее спасибо за любые советы по этому поводу.