Cómo utilizar elementos de configuración de lectura/escritura para implementar la contraseña de inicio de sesión después de que el programa ingrese la contraseña de inicio de sesión la próxima vez, de modo que no necesite ingresar la contraseña directamente para iniciar sesión en el programa. Por favor sube fotos
2
.Subrutina
_Botón1_is_clicked
. Si
(Caja de edición 1.contenido
≠
"""")
Comienza el juicio
"admin"
y
Cuadro de edición 2.content
=
"admin")
Escribir elementos de configuración
(Obtener el directorio de ejecución
()
+
"\user.ini",
"usuario",
"nombre de usuario",
Cuadro de edición 1. Contenido )
Escribir elementos de configuración
(Obtener el directorio de ejecución
()
+
"\ usuario .ini",
"usuario",
"contraseña de usuario",
Cuadro de edición 2.contenido)
Cargando p >
(ventana1,
,
verdadero)
.Predeterminado
Cuadro de mensaje
( "¡Asegúrese de que la contraseña de la cuenta sea correcta!",
0,
,
)
Fin del juicio<. /p>
. De lo contrario
Cuadro de mensaje
("¡La cuenta no puede estar vacía!" ,
0,
,
)
.si final
. Subrutina
__Iniciar ventana_creada
Confirmar inicio
(Si el archivo existe
(Obtener el directorio en ejecución
()
+
"\user.ini")
=
true)
Editar Cuadro 1. Contenido
=
Leer entradas de configuración
(Obtener directorio de ejecución
()
+
"\user.ini",
"usuario",
"nombre de usuario",
)
Cuadro de edición 2. Contenido
=
Leer elementos de configuración
(Obtener el directorio en ejecución
()
+
"\ usuario.ini",
"usuario",
"contraseña de usuario",
) p >
.Default
No sé si esto cumple con sus requisitos.