怎样把在DBGrid中选定的那条记录(dbRowSelect为TRUE),在选定的同时让它出现在Edit等文本框里!很紧急。

解决方案 »

  1.   

    在dbgrid的 oncellclick里写事件,取出点击dbgrid时dbgrid所连接的数据集所在的记录。
    例如dbgrid的datasource所连接的数据集是table1
    则 edit1.text:=table1.fieldbyname('xxx').asstring
      

  2.   

    procedure TForm1.DBGrid1StoreCellClick(Column: TColumn);
    var
      i: Integer;
    begin
      Memo1.Lines.Clear;
      for i := 0 to DBGrid1.Columns.Count - 1 do
        Memo1.Lines.Append(DBGrid1.Columns[i].Field.AsString)
    end;
      

  3.   

    用DBedit,真接做关联就行了。何必这么烦
      

  4.   

    对,用dbedit控件
    或者
    edit1.text:=table1.fieldbyname('xxx').asstring
      

  5.   

    procedure TfrmFir.DBGrid1CellClick(Column: TColumn);
    begin
      Edit1.Text := DBGrid1.SelectedField.AsString;
    end;