Delphi中如何提出Dbgrid中某行和某列的值

我想在双击dbgrid控件的时候，能够把当前的值赋值给edit控件中。

2025-02-28 14:39:07

推荐回答（2个）

回答1：

DBGrid的SelectedField成员存放当前选中的字段，即出于DBGrid中的当前行、当前列的字段
只需要在DBGrid的OnDblClick事件中如下写即可：
procedure DBGrid1.OnDblClick(Sender : TObject);
begin
Edit1.Text := TDBGrid(Sender).SelectedField.Text;
end;

回答2：

既然是dbgrid就应该是和数据库的表有关联，也就是用了query或table做了查询，当然显示可以依靠query或table来实现
比如在query的afterscroll事件里写赋值代码，edit1.text:=fieldbyname('id').asstring;
...