Потому что это в принципе неправильное обращение.
Если тебе надо достать корневые ветки, то пройдись по коллекции Items и выбери тех, у кого Parent = Nil. Это самый понятный метод. Можно достать красивее, но для начала и так сойдет.
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
I : Integer;
begin
For I := 0 To TreeView1.Items.Count - 1 Do
If TreeView1.Items[i].Parent = Nil Then
Memo1.Lines.Add(TreeView1.Items[i].Text);
end;