FoxPro/Visual FoxPro - busqueda incremental

hola :

tengo un grid con una tabla de clientes ordenada por apellido .

en el load del form tengo este codigo :
USE (THISFORM.TABLA) ORDER INDAPE
SELECT (THISFORM.TABLA)
GO top



en el init del form

THISFORM.O_grid1.RecordSource=(THISFORM.TABLa)
THISFORM.Refresh

en el evento keypress del form tengo :

Lparameters nKeyCode, nShiftAltCtrl
Set Near On
Do Case
Case nKeyCode=127 &&BackSpace
Thisform.Busqueda=Left(Thisform.Busqueda,Len(Thisform.Busqueda)-1)
Seek Thisform.Busqueda
Case nKeyCode=29 &&Home
Go Top
Thisform.Busqueda=""
Case nKeyCode=23 &&End
Go Bottom
Thisform.Busqueda=""
Case nKeyCode>=32 And nKeyCode<=250 &&Cualquier letra
Thisform.Busqueda=Thisform.Busqueda+Chr(nKeyCode)
Seek Thisform.Busqueda
Otherwise
Thisform.Busqueda=""
Endcase

Set Near Off
Thisform.Grilla.Refresh

(busqueda es una propiedad delform )

este codigo lo copie de otro proyecto ,en el cual la busqueda la hace perfectamente .

yo en mi form veo los datos de la tabla perfectamente en el grid ordenados por apellido ,el tema es que cuando pulso una letra para que se posicione en el grid ,me sale una leyenda que el grid es de solo lectura .esto es cierto ,pero en el form del proyecto de donde copie este codigo ,efectivamente el grid esta como solo lectura y funciona perfectamente .no s ecual puede ser el error o que me puede estar faltando .desde ya gracias por la ayuda

Tenes la propiedad del grid AllowCellSelection en .F. ?