如何实时获取DBGrid 中当前单元格输入的内容？

如何获取DBGrid 中当前单元格输入的内容？

还没输入完成，我想实时获取 Cell中的内容，以便作其他处理，
用什么事件呢？

所以Field的Onchange事件是没用的。

procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ADOQuery1.State in [dsinsert,dsedit] then
     ADOQuery1.UpdateRecord;
end;

这样可以直接用Edit1.text:=adoquery1.fieldbyname(‘XXOO‘).asstring取值了;
在那里取值或取那个字段值就随你了

DBGrid1.SelectedField.AsString
DBGrid1.SelectedField.Text
看你需要选择

procedure TForm1.DBGrid1DblClick(Sender: TObject);
var
  value: string;
begin
  //value := DBGrid1.Fields[DBGrid1.selectedindex].Value;
  value := DBGrid1.SelectedField.Value;
  ShowMessage(value);
end;

procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if ADODataSet1.State in [dsInsert,dsEdit] then
    ADODataSet1.UpdateRecord;
end;

---

原文地址：https://www.cnblogs.com/jijm123/p/10187544.html