R Restart1 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #1 我的焦点在TreeView的第三级节点上，现在我要去看看他的父节点上的内容，我该怎么办？ 不要告诉我用鼠标去点！`~~~``````[]
H hy17 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #2 Text1.text := TreeView1.selected.parant.Text;
H hy17 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #3 字打错了，不好意思，：） Text1.text := TreeView1.selected.Parent.Text;
Y ydjjld Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #5 TreeView1.selected.parant.Text;
I idon Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #7 看来好多小师弟加入delphi大营了 也好 有走的也有新来的 只可惜了那些壮年改行的高手
老 老人家 Unregistered / Unconfirmed GUEST, unregistred user! 2002-11-06 #8 if TreeView1.Selected.Level = 3 then Text1.text := TreeView1.selected.Parent.Text;
P pengyi007 Unregistered / Unconfirmed GUEST, unregistred user! 2003-03-03 #9 procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode; var AllowExpansion: Boolean); var ParentText:string; //文本 node:ttreenode; begin if Node.Parent.Index<>-1 then ParentText:=Node.Parent.Text; end;
procedure TForm1.TreeView1Expanding(Sender: TObject; Node: TTreeNode; var AllowExpansion: Boolean); var ParentText:string; //文本 node:ttreenode; begin if Node.Parent.Index<>-1 then ParentText:=Node.Parent.Text; end;
]