Italian [HELP] SQLite

Ciao ragazzi sto avendo molti problemi con SQLite.
Vorrei fare un programma che prendendo un button aumenta di 1 una variabile Int
Questa variabile ovviamente sarà salvata sul db per poi essere caricata nel _create.

Chi mi aiuta?
 

ivanomonti

Expert
Licensed User
Longtime User
Ciao ragazzi sto avendo molti problemi con SQLite.
Vorrei fare un programma che prendendo un button aumenta di 1 una variabile Int
Questa variabile ovviamente sarà salvata sul db per poi essere caricata nel _create.

Chi mi aiuta?

puoi usare le preferenze di sistema con le chiavi dedicate alla stessa app

Utilizzo della libreria e creare una key setting

B4X:
Dim SettingApp As PreferenceManager

Scrivere concatenando più valori in una key

B4X:
Sub SaveSetting
   Dim s As String
   If EditText1.Text = "" Then
      ToastMessageShow("Indirizzo abitazione/centro accoglienza obligatorio", False)
      Return
   End If
   If EditText2.Text = "" Then
      ToastMessageShow("Numero SMS Amico obligatorio", False)
      Return
   End If
   If EditText3.Text = "" Then
      ToastMessageShow("Numero telefono amico obligatorio", False)
      Return
   End If
   If EditText4.Text = "" Then
      ToastMessageShow("Numero soccorso obligatorio", False)
      Return
   End If
   s = EditText1.Text & "|" & EditText2.Text & "|" & EditText3.Text & "|" & EditText4.Text & "|" & CheckBox1.Checked & "|" & CheckBox2.Checked & "|" & CheckBox3.Checked & "|" & CheckBox4.Checked & "|" & CheckBox5.Checked & "|" & EditText5.Text
   SettingApp.SetString("SettingKey",s)
   Setting.GetSettingKey
End Sub

leggere la key, splittare la stessa per ogni singolo valore

B4X:
Public Sub GetSettingKey

   Dim Result() As String
   Result = Regex.Split("\|",Main.SettingApp.GetString("SettingKey"))
   
   If Result.Length = 0 Then
      M1Setting
   Else
      Main.SettingList.Initialize
      For i=0 To Result.Length-1
         Main.SettingList.Add(Result(i))
      Next
   End If
   
End Sub

Più semplice ed efficace, veloce e non solo al remove app elimina tutte le key dal dispositivo.
 
Top