给treeview添加符合条件的结点？？？

Question

treeview中只有根如下：
--aa
--bb
--cc
--dd
--ee现在想从txt文件中提取符合条的数据，并把数据加入到相应的节点下:
txt 内容如下:
aa,001,0.0
bb,002,1.2
aa,008,3.6
cc,200,4.5
bb,500,6.0以上数据加入树中后，树为如下结构
--aa
  --001,0.0
  --008,3.6
--bb
  --002,1.2
  --500,6.0
--cc
  --200,4.5
--dd
--ee

Answer 1

以下是我自己的解决办法,但是添加二级节点出来的结果有问题,帮我看看问题出在那里,帮解决??
for I:=0 to TreeView1.Items.Count -1 do
       begin
         Txt:='a.txt';
         AssignFile(F,Txt);
         Reset(F);
         while not Eof(F) do
          begin
           Readln(f,s);
           str1:=aa(s);//提取aa,bb,cc,dd
               
           if (str1=TreeView1.Items[i].Text)then
              begin
              treeview1.Items[i].Selected:=true;
              treeview1.Items.AddChild(treeview1.Selected,s);
              end;
          end;
         CloseFile(F);

Answer 2

把for循环放到while循环的里面试试,在你执行treeview1.Items.AddChild(treeview1.Selected,s);
时,treeview1.items.count在增加,而你的for循环的次数却没有改变,所以回丢失记录的