Xailer & OZ Software

Hola Ignacio, puede probar la clausula delete
de tdbfdataset,
en el programa que tento en la 13b funciona bien
pero en la 13c, se queda en el mismo registro siempre
los puedes comprobar.
Gracias

PILO ve a la ayuda de Xailer y fí­jate como funciona el delete para
borrar registros hay un ejemplo y te puedo asegurar que sí­ funciona.
** Buscar los registro para borrar en el fichero Individual
buscador := DTOS(dFecha) + Upper(cLugar) + cClub
WITH OBJECT ::oDbfIndividual
:SaveState( .T. )
:GoTop()
DO WHILE :Seek(buscador)
*
:Delete()
*
END DO
:RestoreState( .T. )
END WITH
El problema es que si empleas un bucle While el delete hace ya un Skip
el solo.
José Ramón Castro.
PILO escribió:
> Hola Ignacio, puede probar la clausula delete
> de tdbfdataset,
> en el programa que tento en la 13b funciona bien
> pero en la 13c, se queda en el mismo registro siempre
> los puedes comprobar.
> Gracias
>
>

Ramón, eso es lo que hago, pero ahora me esta funcionando bien
algunas veces, tengo que poner :ship() para que funcione,
y no se por que es
Se puede decir que ya funciona bien