FoxPro/Visual FoxPro - Borrar registro de un Grid Por medio de RECNO()

Hola
Bueno les cuento que tengo un grid y en este grid se repiten los Codigos de articulo eso no importa el problema es cuando quiero borrar un dato en especifico y busco el codigo del que quiero borrar y cuando borro se me borran todos los registros que tengan el mismo codigo
esta es la instruccion que uso

DELETE From AliasDigita Where AliasDigita.CodArti = lcArtiElim

Ahora esa linea esta en comentario por que no hace lo que necesito
Para borrar el articulo debo hacer click primeramente en el cual deseo borrar y luego presionar el boton que borrar
Pense en capturar el Numero de registro y lo capture de la sgte manera

SELECT CurDigita
GO RECNO()
lnReg = RECNO()
MESSAGEBOX(STR(lnReg))

El messagebox lo puse para ver que resultaba me daba y funciona bien

Ahora lo que quiero saber ¿Cómo puedo borrar un registro usando el numero de que me devuelve el RECNO()?

DELETE FOR RECNO()=lnReg
thisform.refresh

en el botón eliminar yo uso este código y suprimo cualquier
fila del grid .

Set delete On
SELECT Tabla
DELETE
GO RECNO()

Thisform.Grid1.Columns(1).SetFocus()

Set delete off

El código de Cris me fucionó perfectamente pude borrar los registros desde el boton eliminar,