delphi7 dbgrid如何获取当前选中行的设置为隐藏字段的值

一个表有 A,B,C,D,E,F 6列，在adoquery的sql中，设置dbgrid只显示出了E,F两个字段，我想实现如下功能，双击其中一行，如何获得当前行的 A,B,C,D 字段的值，谢谢。

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

//当前选中行的某个字段的值 var a:integer;    //定义1个变量 begin     a:=strtoint(edit1.text)-1;    //字段的位置1.2.3......   //-1因为字段是从0开始的     //字段1等于计算机的字段0     edit2.text:=adoquery1.fields[a].value;    //将字段的内容显示到文本中 end;

//当前选中行的某个字段（主键）的值 begin     edit1.text:=adoquery1.fields[0].asstring; end;