用treeview建树(100分)

我是delphi新手,想请教下, oracle库中1个父节点表 1个子节点的表
想在delphi7下建树怎么建.
而且当电击树中节点时在dbgrid控件中显示出来

用TADOQuery组件举例吧。
放个ADOQuery1，SQL语句写select * from 主表；
放个ADOQuery2，SQL语句写select * from 子表 where id = :MainID；
然后在ADOQuery1的OnAfterScroll事件里面写：
ADOQuery2.ParamByName('Main').AsInteger:= ADOQuery1.FieldByName('id').AsInteger;
这样主细表就建立关联了，不用建树。