当前位置：首页 → 问答吧 → TreeView不会弄了。从发一下.

TreeView不会弄了。从发一下.

时间：2011-09-27

来源：互联网

上次没写清楚.辛苦大家了.
Delphi(Pascal) code


Root
  aaa
    312654
      231as5
    sdf
    sd
  bbb
    sdf5e
    3s2d1f
      321fs
  ccc
    32ds
    321d
.............

我选中aaa树下的任意一项时.取aaa的位置.

aaa是第一个为1
bbb是第二个为2
ccc是第三个为3
...

作者: nydns 发布时间: 2011-09-27

遍历找aaa，如果确认是aaa下的，就递归找parent

作者: bdmh 发布时间: 2011-09-27

引用 1 楼 bdmh 的回复:
遍历找aaa，如果确认是aaa下的，就递归找parent

给个代码呗

作者: nydns 发布时间: 2011-09-27

Delphi(Pascal) code


var
 选中指针 : TTreenode

选中指针 := TreeView1.Selected;

while  选中指针.Parent <> 【root】 do
begin
  选中指针 := 选中指针.parent
end
  
  选中指针.Index ;

作者: warrially 发布时间: 2011-09-27

取aaa的位置？坐标还是treenode？
另外，循环找父节点时，可能要以level=1作为结束循环的标准比较合适

作者: sz_haitao 发布时间: 2011-09-27

引用 4 楼 sz_haitao 的回复:
取aaa的位置？坐标还是treenode？
另外，循环找父节点时，可能要以level=1作为结束循环的标准比较合适

嗯 Level = 1 比较好没开IDE, 想不起来这个

作者: warrially 发布时间: 2011-09-27

热门阅读