FoxPro/Visual FoxPro - borrar registros

Hola foro!!!
Esperando me puedan ayudar y es con lo siguiente deseo eliminar registros del empleado que muestro en un grid, no sé lo que pasa cuando lo ejecuto en desarrollo lo hace correctamente pero al ejecutarlo ya generado no elimina los registros tengo el siguiente código

Con esto muestro los regs. del empleado esta en el (INIT) del formulario

Select periodo,concepto,horaext,guardias,signo,tipo,sueldo,importe,dias,numemp,marca;
From pgap Where numemp=nde and concepto <> 27 Into Cursor cpgap ReadWrite
Thisform.grid1.RecordSource='cpgap' el DeleteMark esta en .T.

Dentro del text de cada columna del grid en keypres tengo esto
If nKeyCode=9 or nKeyCode=13
Delete
Replace marca With 1
Endif

En el botón ELIMINA que está en el mismo formulario en el procedimiento click tengo esto

Select cpgap
Scan
If cpgap.marca=1
Delete From pgap Where numemp=cpgap.numemp and periodo=cpgap.periodo and concepto=cpgap.concepto
EndIf
EndScan

Lo hago con un (append from) con (delete from) y con (append blank) y lo realiza el borrado lógico(lo marca con el rectángulo negro)
Como lo puedo solucionar ?
GRACIAS.