如下的Treeview中想获取相应的根下的接点内容怎么可以提取？？？

Question

如：
1111111
    01
    02
    03
    04
2222222
    10
    11
    12
    13
    14
3333333
    20
    21当我选中根接点时想通过循环获取相应根的接点内容，我怎么写循环？？
如当选中3333333根接点时，可以通过循环得到20，21就可以了。

Answer 1

手边现在没有delphi所以可能描述的不准确，你可以先根据
TreeView1.Selected.count来知道选中节点下的子树个数
然后TreeView1.Selected.GetFirstChild（也许是FindFirstChild，记不清了）就能够找到第一个子树，然后TreeView1.Selected.GetFirstChild.text就是第一个满足条件的值
而且循环的条件你也已经知道，那就用.Next区循环查找吧...

Answer 2

用var _selectnode:ttreenode,i:integer;
_selectnode:=treeview1.Selected;//得到选中的节点 
for i:=1 to _node.Count do
begin
 _selectnode.Parent.Item[i]
end;//循环访问每个子节点

Answer 3

帮你搞定
function GetChildren(CurrentNode: TTreeNode): TStringList;
var
  i: Integer;
begin
  Result := nil;
  if CurrentNode.Count > 0 then
  begin
    Result := TStringList.Create;
    for i := 0 to CurrentNode.Count -1 do
    begin
      Result.Add(CurrentNode.Text);
    end;
  end;end;