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

标签：bsp   div   str   change   class   内容   ase   procedure   query   

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

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

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

这个问题简单啊,每输入1个数据的后就提交(并不是提交到数据库,还是在编辑状态),那么用DataSet就可以取值了
用DBGrid的KeyUp事件:

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;

 

---

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

标签：bsp   div   str   change   class   内容   ase   procedure   query   

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