如何取出dbgrid选定行的值?

Question

现已从数据库中提取了数据到dbgrid中,option中dgrowselect为true
如何把选择行的选定字段的值赋值给edit
如选择行中字段1的值赋值给edit1,选择行中字段2值赋值给edit2……  
请贴源码

Answer 1

edit1.text := dbgrid.datasource.dataset.fieldbyname( dbgrid.columns[dbgrid.col-1].fieldName).asString

Answer 2

在DBGRID的CellClick中写代码
如下  
  with qry_tmp do  //与DBGRID相关联的QUERY
  begin
    if isempty then
    begin
      showmessage('请先选择当前的操作数据！');
      exit;
    end;
    if fields[0].Value<>null then
    begin
        edt_sslp.Text:=FieldByName('F_sslp').AsString;
        edt_lh.Text:=FieldByName('F_lh').AsString;
        edt_fh.Text:=FieldByName('F_fh').AsString;
    end;    
  end;

Answer 3

dbgrid.Colums.grid.Field[0].text；
field[0]中数字代表所取值所在的列