两个dbgrid联用。

Question

两个dbgrid　A和B，A和B有对应关系。
　问题：选中A中的某条记录时，B中相对应的记录行改变颜色，并且如果B中相应的记录不在当前显示时能自动调到当前显示？
　可以实现吗？

Answer 1

颜色自己变吧!
procedure TForm3.DBGrid13CellClick(Column: TColumn); (A)var s1:string; begin s1:=query17.FieldValues['gzbh']; with Query18 do      begin        close;        SQL.clear;        SQL.add('select * from gzlb where gzbh=:p1');        ParamByname('p1').Asstring:=s1;        prepare;        open;      end; end; 

Answer 2

如果A,B中的数据是相同的话；最简单的是将两个控件的datasource设置为一个；^_^；