Como ler um texto salvo sem ter que aperta um button

Cesar_Morisco

Active Member
Licensed User
Longtime User
Ola bom dia
Eu fiz um pequeno programa para teste
Mais se usar o código do Button Ler texto no incio do programa ele da error
Preciso só salvar o texto. Mais quando eu clicar no aplicativo o texto já venha na caixa de texto
Aqui esta o programa
Obrigado
B4X:
Dim Button1 As Button
    Dim Button2 As Button
   
    Dim EditText1 As EditText
    Dim EditText2 As EditText
    Dim EditText3 As EditText
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("Layout")
   
End Sub
Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub
Sub Button1_Click
     Tex.Clear
     Tex.Put("EditText1", EditText1.Text)
    Tex .Put("EditText2", EditText2.Text)
     sets.Put("EditText3", EditText3.Text)
     File.WriteMap(File.DirInternal,"btnset.set", sets)
     ToastMessageShow("Texto Salvos", False)
End Sub
Sub Button2_Click
     sets = File.ReadMap(File.DirInternal,"btnset.set")
     EditText1.Text = sets.Get("EditText1")
     EditText2.Text = sets.Get("EditText2")
     EditText3.Text = sets.Get("EditText3")
End Sub
 

Douglas Farias

Expert
Licensed User
Longtime User
Só colocar o mesmo código do readmap no Activity_Create depois de carregar o layout
 
Top