Lo siguiente que vamos a hacer es una ventana de mensaje donde nos pregunte si deseamos guardar los cambios, para ello, vamos a la función guardar, añadimos una línea, donde vamos a poner la ventana de mensaje, donde aparezca Desea guardar los cambios.
En la siguiente línea, ponemos un if, y, preguntamos si la variable valor es igual a True, en ese caso, las líneas son las que hemos usado para grabar los datos.
Lo siguiente va a ser limpiar los campos, para ello, debemos de usar set, y, entre los paréntesis, poner dobles comillas dobles, excepto, para etiqueta, donde debemos de usar el parámetro text de config e igualarlo a nada, y, para varestadocivil, donde usamos Initialize y ponemos 0.
Lo siguiente va a ser leer registros, vamos a añadir otra variable llamada varid como stringvar.
Vamos a la línea id, añadimos el parámetro textvariable e igualamos a varid.
Creamos una función, la llamamos leerregistros, abrimos la conexión, creamos el cursor.
En la siguiente línea, ponemos:
Quiere decir que va a seleccionar el id que introduzcamos.
En la siguiente línea, ponemos:
Usamos for, creamos una variable, ponemos in y la variable registro.
Ponemos cada campo, seguido de set, entre los paréntesis, ponemos la variable “x”, y, entre corchetes el elemento a recuperar, empezando por 0.
En la última línea, ponemos commit.
Vamos donde creamos el menú, y, vamos a añadir el elemento leer, como parámetro command igualamos a leerregistros.
Vamos a la línea id y quitamos el parámetro state.
Probamos, ponemos un ID, desplegamos el menú archivo, seleccionamos leer, y, vemos como ha recuperado el registro de dicho ID.
Lo siguiente va a ser modificar o actualizar registros, vamos a la función leerregistros, copiamos las dos primeras líneas, y, pegamos.
Debemos de usar update, nombre de la base de datos, ponemos set, el campo estado y ponemos la misma expresión que usamos para guardar registros.
Es decir, el campo estado va a valer el valor que tenga en ese momento la variable varestadocivil.
Añadimos el resto de los campos.
Añadimos:
La misma expresión que hemos usado antes para el id seleccionado.
Vamos al menú, añadimos el elemento actualizar, como parámetro command igualamos a actualizar.
Pues, solo queda probar, ponemos un id, del menú, seleccionamos leer, hacemos modificaciones, seleccionamos actualizar del menú, y, vemos como los cambios han sido guardados.
Añadimos una ventana de información, como sigue:
Creamos otra función, la llamamos borrar, para borrar los datos, las líneas son las mismas que usamos anteriormente.
Agregamos un elemento más al menú archivo, llamado borrar, como parámetro command igualamos a borrar.
Miguel Angel Franco
Comments