G guoqun Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-23 #1 如何遍历treeview选定节点下的节点，而不是整树遍历。
D dj_lgy Unregistered / Unconfirmed GUEST, unregistred user! 2008-12-23 #2 procedure SeeTreeNode(Node:TTreeNode); var i:integer; Node1:TTreeNode; begin for i:=0 to TreeNode.Count-1 do begin Node1:=TreeNode.Item; { 此处填写需要的代码 } SeeTreeNode(Node1); end; end; // 调用 SeeTreeNode(Treeview1.Selected)
procedure SeeTreeNode(Node:TTreeNode); var i:integer; Node1:TTreeNode; begin for i:=0 to TreeNode.Count-1 do begin Node1:=TreeNode.Item; { 此处填写需要的代码 } SeeTreeNode(Node1); end; end; // 调用 SeeTreeNode(Treeview1.Selected)
