Hola amigos de la lista, tengo un formulario con un dbgrid, necesito que al momento de presionar enter sobre la grilla se cierre el formulario?

esto lo estoy haciendo en el evento OnKeyDown de la siguiente manera:

if (key = VK_RETURN) then
      ModalResult := mrOk;
else
    item.SetFocus;

el problema es que si el conjunto de datos en la dbgrid tiene m�s de un registro al momento de cerrarse la ventana me toma el siguiente registro.

He desactivado las propiedades AutoAvance y TabAvance asign�ndole el valor aaNone, pero no me ha funcionado

Gracias de Antemano

Gustavo Cruz
------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20140225/7a59dcae/attachment.html>

El d�a 25 de febrero de 2014, 10:49, Gustavo Adolfo Cruz Martinez <gustavo7218 en hotmail.com> escribi�:

Tenes un boton en el formulario? ponele la propiedad default=true; va a tomar el enter el antes del dbgrid.
Otra, tenes que asignar 0 al key para que no siga en el metodo padre. Sino esto no anda, us� el evento onkeydown del formularios con la propiedad keypreview=true