Italian Salvare il valore di una variabile ...

[PakoT52]

Ciao a tutti , come dal titolo volevo salvare il valore di una variabile ad esempio "a" quando si chiude l'applicazione . Sono nuovo su Basic4Android e mi sto imparando facendo qualche semplice applicazione , pian piano aggiungo cose alla mia applicazione ed adesso è giunto il momento di fare questo , ma non so proprio come fare . Grazie mille

 

[arenaluigi]

Ma dove la vuoi salvare ?
IN un file ?
In un database ?
Ciao

 

[PakoT52]

Ciao , volevo far creare un file e mettere il salvataggio , però vorrei che non si potesse modificare in alcun modo . Grazie mille

 

[arenaluigi]

Per poter salvare dei dati in un file puoi usare il seguente codice.

Dim Twriter As TextWriter
Twriter.Initialize(File.OpenOutput(File.DirDefaultExternal, “Text.txt”, False))

Twriter.WriteLine(“ciao a tutti”)
Twriter.WriteLine(“ciao a tutti due”)
Twriter.Close

Dipende cosa intendi per non modificabile.

 

[PakoT52]

Puoi spiegarmi meglio quel codice da te citato sopra ? Grazie . Per non modificabile intendo che l'utente che scarica l'applicazione non posso modificare in qualche modo il valore della variabile in modo da alzarla o abbassarla. Grazie mille

 

[maxware]

Ciao Pako
Mi inserisco. nell'esempio di Arena viene creato un file chiamato Text.txt ove al suo interno vengono scritte due righe
Ciao a tutti
Ciao a tutti due
Poi il file viene chiuso
Essendo un file di testo e' modificabile dall'utente.

 

[PakoT52]

Grazie mille maxware , a me servirebbe un modo per salvare una variabile quando chiudo l'applicazione e riavere il valore quando la apro uguale a quando l'avevo chiusa .

 

[arenaluigi]

Pako,
Secondo me ti conviene usare il database.

Inviato dal mio GT-I9300 con Tapatalk 2

 

[PakoT52]

Eh , come detto all'inizio sono nuovo nel campo e molte anzi moltissime cose non le so . Se potresti darmi un aiuto più dettagliato tene sarei grato.

 

[maxware]

Sul forum di Luigi avevo postato un piccolo esempio di gestione database
ciaooo
Mamo

 

[marcick]

Ciao, puoi usare in modo molto pratico ed efficiente le MAP.

Sub SaveSettings

   Dim MySettings As Map
   
    Try 
      MySettings.initialize 
      MySettings.put("SoundOption",SoundOption)
      MySettings.Put("ZoomOption",ZoomOption)
      File.WriteMap(Main.AppPath, "Settings.ini", MySettings) 
      Log("Settings saved")
   Catch 
      Log("SaveValues - "&LastException.Message) 
   End Try

End Sub 


Sub ReadSettings

    Dim MySettings As Map
    Dim key, value As String 
      
    Try 'If SavedValues exist, load them, else use defaults 

        If File.Exists(Main.AppPath, "Settings.ini") Then 
         Log("reding settings ..")
         MySettings = File.ReadMap(Main.AppPath, "Settings.ini") 
              For I = 0 To MySettings.Size - 1 
              key = MySettings.GetKeyAt(I)
            value = MySettings.GetValueAt(I) 
            Select key 
               Case "SoundOption" 
                  SoundOption = value 
               Case "ZoomOption"
                  ZoomOption = value
               End Select 
            Next 
      Else
         Log("Loading default settings")
         SoundOption=2      
         ZoomOption=1      
         SaveSettings
      End If 
   Catch 

        Log("ReadValues - "&LastException.Message) 

    End Try
   
End Sub

 

[arenaluigi]

Si ma se il dato non deve essere modificabile, ho lo salva in un database oppure nel web.

 

[PakoT52]

Esatto , però per il database ci vuole una libreria giusto ? Se si io non posso avendo la versione di prova del programma ..

 

[arenaluigi]

Con la versione free puoi fare poco e niente :sign0161:
Sul mio forum c'è una bella offerta per la versione premium.
Ciao