Ayuda sobre barra de Navegación de registros

Estoy creando un formulario modelo sin utilizar el asistente pero no se que código se colocan los botones de Nuevo, Modificar, Deshacer, Eliminar, Guardar, etc.

1 respuesta

Respuesta
1
Digamos en el de ir al primero podrías tener
If !Empty(Alias())
Go bottom in (alias())
Endif
En el de anterior
If !Empty(Alias()) and !bof(Alias())
Skip -1 in alias()
Endif
En el de Siguiente
If !Empty(Alias()) and !eof(alias())
Skip 1 in alias()
Endif
Para el del final
En el de anterior
If !Empty(Alias())
Go bottom in (Alias())
Endif
El uso de Alias() es para asegurarse
De que hay una tabla abierta en ese momento.
Ahora para guardar depende de como estés haciendo tu los cambios, y que tipo de buffer estés usando
pero un código que te podría servir
seria
if !empty(Alias())
TableUpdate(.f., alias())
Endif
Para eliminar
if !empty(Alias())
delete in Alias()
Endif

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas