请各位大虲救急，关于dbgrid的问题

Question

我在form1中adoquery->DataSource->DBGrid1
我想实现双击DBGrid1中某记录行后，打开form2,form2中的edit组件可显示form1.dbgrid的指针行记录的字段值

Answer 1

form2.catption:=from1.adoquery.fieldbyname('xxx').asstring

Answer 2

楼上的方法，我已试过，是不能随dbgrid的指针将值传给form2.edit.text的，总是只能得到dbgrid的datasource的第一条记录的字段值,请问有无更好的办法，请详细说明行吗

Answer 3

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
  form2.Show;
  form2.Edit1.Text := dbgrid1.DataSource.DataSet.fieldbyname('xxx').AsString;
end;
它本身就会随你点击的记录取值

Answer 4

procedure TForm1.Table1AfterScroll(DataSet: TDataSet);
begin
  //
end;

Answer 5

procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
    form2.Edit1.Text := dbgrid1.DataSource.DataSet.fieldbyname('xxx').AsString;
    form2.Show;
end;
这样就可以了！！！！