怎样在TDBGrideh中双击进入鼠标所在的格子里进行编辑

Delphi(Pascal) code

      DBGrideh.Options := Options - [dgRowSelect];      DBGridehOptions := Options + [dgEditing, dgAlwaysShowEditor];

如上代码放在在双击事件处理过程中，DBGrideh会进入编辑状态，但默认并没有激活鼠标所在的格子里编辑，而是要重新点一下想要编辑的格，再用键盘输入，我想要的效果是双击即进入鼠标所在那一格编辑，大家有什么实现办法？
试过DBGrideh.SelectedIndex，但每次问题返回0.

[解决办法]
假如DBGrideh连接的Dataset是adoquery1,则在双击事件后面加上

If not adoquery1.IsEmpty then
adoquery1.Edit;
DBGrideh.SelectedField.FocusControl;