求教TreeView报错的问题(50分)

读取数据，跟踪时 生成树时半途出错。
这个错误，只是有时候运行时出现，大部分情况下却不会出现。
错误为：类名：TcxTreeView异常：参数不正确。
trvZhxm.Items.Clear;
try{try}
strList := TStringList.Create;
strList.Clear;
strList.Sorted := True;
trvZhxm.Items.begin
Update;
Q_zhxm.First;
while not Q_zhxm.Eofdo
begin
Index := strList.IndexOf(Trim(Q_zhxm.FieldByName('ZXKS').AsString));
Case Index of
-1:
begin
root_node := trvZhxm.Items.Add(nil,Trim(Q_zhxm.FieldByName('ZXKS').AsString));
trvZhxm.Items.AddChild(root_node,Q_zhxm.FieldByName('ZHXMMC').AsString);
strList.AddObject(Trim(Q_zhxm.FieldByName('ZXKS').AsString),root_node);
end;
else
trvZhxm.Items.AddChild(TTreeNode(strList.Objects[Index]),
Q_zhxm.FieldByName('ZHXMMC').AsString);
end;
Q_zhxm.Next;
end;
finally
trvZhxm.Items.EndUpdate;
//trvZhxm.Items.
strList.Free;
end{try};

怎么没人回答呢，是嫌分少吗？我可以再加呢

算法有问题。
你得把数据库结构贴出来看看。
这种情况推荐用父子关系处理。
否则检索数据时的排序很难把握。

哪儿的问题，请明示~！

你先把数据库结构贴出看看。
应该是排序有问题。导致出现空节点了吧。

数据结构，请看一下，看一下数据表，好象也没有什么问题。

问题解决了，
注释掉了：trvZhxm.Items.EndUpdate;
就不会出现问题了，只是不知道原因

放分吧。

不知道哪位能否指出原因呢

给分了~！