Spanish Guardar la configuración del usuario (SOLUCIONADO)

Zabatta

Member
Licensed User
Hola, chicos tendrán alguna información sobre como puedo guardar los cambios que haga el usuario en la app antes de cerrar, de manera que los cambios realizados se carguen al abrir la app nuevamente.

por decir, el usuario ingresa un texto en un edittext, cierra la app y al abrirla el edittext mantiene el texto ingresado. No necesariamente tiene que ser un Edittext, puede ser un check box o cualquier view.

Si es posible que se guarde localmente en el teléfono y no en un servidor.

De antemano muchas gracias.
 

Alejandro Moyano

Member
Licensed User
Si no deseas usar SQLite podes usar un archivo, aca te dejo un ejemplo encriptando un archivo.
Este código solo funcionaria en B4A, que es la mas sencilla de implementar, podes buscar en el foro como hacerlo usando librerías B4X.

B4X:
Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.
    Type Configuracion(Nombre As String)
End Sub

Sub cmdAbrir_Click
    Try
        Dim rm As RandomAccessFile
        Dim conf As Configuracion
        rm.Initialize(File.DirInternal,"datos.conf",False)
        conf = rm.ReadEncryptedObject("123",0)
        rm.Close
        txtNombre.Text = conf.Nombre
    Catch
        ToastMessageShow("Error no hay datos guardados",True)
    End Try
End Sub

Sub cmdGuardar_Click
    Try
        Dim rm As RandomAccessFile
        Dim conf As Configuracion
        conf.Initialize
        rm.Initialize(File.DirInternal,"datos.conf",False)
        conf.Nombre = txtNombre.Text
        rm.WriteEncryptedObject(conf,"123",0)
        rm.Close
        ToastMessageShow("Datos guardados exitosamente",True)
    Catch
        ToastMessageShow("Error al intentar guardar datos",True)
    End Try
End Sub
 

Attachments

Top