如何取得TreeView的第一级Item?

Question

TreeView内容如下:
a
+-+a1
  |
  +a2
  |
  +a3
b
+-+b1
  |
  +b2
  |
  +b3
c
+- ...
d
+- ...
现在我想取得TreeView下的a,b,c,d(只要这几个),怎么取?谢谢!

Answer 1

for i := 0 to TreeView1.Items.Count-1 do
begin
  if TreeView1.Items[0].Level <> 0 then continue;
  ...  //需要的 Item
end;

Answer 2

for i := 0 to TreeView1.Items.Count - 1 do
begin
  if TreeView1.Items[i].Parent <> nil then continue;
  ...  //需要的 Item
end;

Answer 3

To: shove(shove)
您打错了：），0 应为 ifor i := 0 to TreeView1.Items.Count-1 do
begin
  if TreeView1.Items[i].Level <> 0 then continue;
  ...  //需要的 Item
end;

Answer 4

for i := 0 to TreeView1.Items.Count - 1 do
begin
  if TreeView1.Items[i].Level=0 then..........//////TreeView.Items[i]就是想要的记录。 
end;