>>693
大元の親の子の数(?)はItems.Countとなってしまい求めることが出来ず困って居ます
スマートではないですがこんなかんじで書いてみました
while (TreeView1.Items.Item[nodelevel].Level <> 0) or (TreeView1.Items.Item[nodelevel].AbsoluteIndex = 0) do
begin
Inc(nodelevel);
end;

と書いてみたのですが、このようなローラー作戦みたいな事はやはり処理時間も長くなってしまうのでしょうか？