Delphi7 Treeview控件使用？

1根结点-1父结点-1子结点
               -2子结点
               -3子结点
               -4子结点当前光标在-4子结点上，需要一条代码就可以知道它的父结点是谁，这条代码要怎么写？
比如：TreeView1.selected.父结点.text，类似于这样我就可以取到父结点的值了。
还有没有什么方法能快速得到的？还有就是光标在-4子结点时如果再运行TreeView1.selected.next就会跳出出错窗口，如何避免这样的情况？