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

来源:百度知道 编辑:UC知道 时间:2024/06/18 18:47:28
我想在双击dbgrid控件的时候,能够把当前的值赋值给edit控件中。

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

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