将dbgrid某字段值赋给treeview做子结点 请问~

将dbgrid某字段值赋给treeview做子结点 请教~~~
再描述清楚点   如
dbgried中有2个字段   一个aa   一个bb
而在treeview中有结点的值是个dbgrid的字段bb值是一样的
现在我要取dbgrid的字段aa   将它做与bb值一致的treeview结点做子结点
我写了个代码
var
i:integer;
node:ttreenode;
pnode:pnodedata;
begin
for   i:=0   to   treeview1.Items.count-1   do
begin
if   adoquery1.FieldByName( 'bb ').AsString=treeview1.Items.Item[i].Text   then
node:=treeview1.Items.AddchildObject(treeview1.Items.Item[i],aa的值,pnode);
end

感觉这个循环里的if语句有问题   没有这个if语句添加结点是没任何问题的
有了这个if语句就是没有任何反应   不知道怎么回事

高手来指导下`~~谢谢啊

------解决方案--------------------
bb,aa 是不是主子关系?

------解决方案--------------------
treeview的節點是TTreeNode,TTreeNode有一個屬性叫data,它是一個指針，利用它可以達到你的目的。