如何实时获取DBGrid 中当前单元格输入的内容?
时间:2021-07-01 10:21:17
帮助过:2人阅读
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