菜鸟求助：如果将要选择的数据行的数据项自动填入文本框内？

Question

学Delphi尚浅，我甚至不知道应该在哪个控件内编码，是在DBgrid还是DBNavigator，还是Edit框内？
DBgrid中是一行一行选择的，如果某行变蓝就自动显示在下面的Edit框内。
向各位大侠求助，望不吝赐教！

Answer 1

procedure TForm1.DBGrid1DblClick(Sender: TObject);
var
 i:integer;
begin
  Edit1.Clear;
  for i:= 0 to adoquery1.FieldCount - 1 do
  begin
    Edit1.Text := Edit1.Text + adoquery1.Fields[i].AsString;
  end;

Answer 2

edit.text := dbgrid.FieldByName('字段名').AsString;

Answer 3

错了，是edit.text := adoquery.FieldByName('字段名').AsString;
adoquery是dbgrid的数据源

Answer 4

我试了一下，把三个方法都试了一遍（adoquery1.Fields，dbgrid.FieldByName，FieldByName）还是不行，Edit框里面还是没有内容。
继续求助啊

Answer 5

procedure TForm1.DataSource1DataChange(Sender: TObject; Field: TField);
begin
  edit1.text :=(Sender as TDataSource).DataSet.FieldByName('字段名').AsString;
end;楼上的方法应该都是可行的，楼主还自己好好看看自己是那里的设置问题或者是代码问题。