//想在DBGRID1的ZH中在DBGRID2中显示出其数据,不知道怎么做出这效果

Question

//ado.ado1= adoqueryprocedure TForm1.FormActivate(Sender: TObject);//在DBGRID1显示出ZH
begin
ado.Close;
ado.SQL.Clear;
ado.SQL.Add('select zh from a');
ado.Open;
end;//想在DBGRID1的ZH中在DBGRID2中显示出其数据,不知道怎么做出这效果
procedure TForm1.DBGrid1DblClick(Sender: TObject);
var
a:string;
begin
   a:=ado1.FieldByName('zh').Value;
  ado1.Close;
  ado1.SQL.Clear;
  ado1.SQL.Add('select ma from dbo.a where zh = '+''''+a+'''');
    ado1.Open;
end;end.

Answer 1

a:=ado.FieldByName('zh').Value;  
ado1.Close;
ado1.SQL.Clear;
ado1.SQL.Add('select ma from dbo.a where zh = "'+a+'"');
ado1.Open;其实  用两个query,设置主从表关系也可以