继续delphi

继续求助delphi
2个dbgrideh,其中关联项id,第一个选择一项的话，第2个怎么显示出和这个id有关的所有项！

[解决办法]

Delphi(Pascal) code

dbgrideh1+DataSource1+ADOQuery1dbgrideh2+DataSource2+ADOQuery2比如你的ID字段是字符类型Form1 Create事件:with ADOQuery1 dobegin  close;  sql.text:='select * from t1';  open;end;ADOQuery1 AfterScroll事件:with ADOQuery2 dobegin  close;  sql.text:='select * from t2 where id='+quotedstr(dataset.fieldbyname('id').asstring);  open;end;