Android Question connecting activity modules help

[piero123]

hi everyone , i have activity modules, in the activity module 1 i have this code

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("Layout1")
  
    If FirstTime Then
SMTP.Initialize("smtp.gmail.com", 465, "[email protected]", "jaja1234", "SMTP")
SMTP.UseSSL = True 'Esta linea la ponemos ya que Gmail requiere SSL
SMTP.Subject = (EditText2.Text)
SMTP.HtmlBody = True
End If
End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub


Sub Button1_Click
SMTP.Body = EditText1.Text
SMTP.To.Add(EditText6.Text)
SMTP.Send
  End Sub

Sub SMTP_MessageSent(Success As Boolean)
  If Success=True Then StatusSend1="SI enviado"
  If Success=False Then StatusSend1="NO Enviado"
  Log(StatusSend1)
End Sub

Sub Button2_Click
  
Activity.LoadLayout("2")
  
End Sub

and in the activity module 2 i have this code

Sub Process_Globals
    'These global variables will be declared once when the application starts.
    'These variables can be accessed from all modules.

End Sub

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private EditText5 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("Layout2")

End Sub

Sub Activity_Resume

End Sub



Sub Activity_Pause (UserClosed As Boolean)

End Sub

my question is , how i can do to the activity module 1 recognize the editext5 what is in the activity module 2 sorry for my bad english

 

[lemonisdead]

Hello,
From activity 2, on change or in Activity_Pause, I would store the content of the edittext5 in a file using Erel's PreferrenceActivity library for easiness. And retrieve its content from activity 1.

Save content sample

Dim Manager as PreferenceManager
Manager.SetString("AnyName",edittext5.text)

Read sample

Dim Manager as PreferenceManager
Edittext5.text=Manager.getstring("AnyName")

 

[piero123]

can u see my project i dont understand i want edittext not delete the text i write sorry for my bad english

 

[LucaMs]

I would help you but I can not load your project, it is for the new B4A version.

But I would advise you to give to views a self-explanatory name (you could use edtMsgBody or edtBody instead of EditText1.Text) and to explain what the second activity does.

However, you can use a variable declared in Process_Globals and fill it with the contents of EditText5, then every activity can read (and write) that variable, using Activity2.VarName

(sorry but my English is bad too )

 

[piero123]

i only i want is the editext3 dont delete the text what i write , because every i change the layout the edittext3 delete the text and is empy :/

 

[Erel]

You do not need to save it in a file.

There are two ways to pass information between activities:
1. Store the value in a process_global variable (do it in Activity_Pause) and then access the variable from other modules:
Two activities example

2. Use CallSubDelayed to start the second activity and pass the information. This is the preferred method.
http://www.b4x.com/forum/basic4andr...yed-interact-between-activities-services.html

 

[piero123]

i try that but nothing :/ can u check my project? i only want is the editext3 dont delete the text i write cuz every i change the layout and i return the edittext is empy :/ please help

 

[DonManfred]

What you need is the statemanager i think

 

[piero123]

well i try and nothing :/ im very confused

 

[margret]

In the First Activity have:

Sub Process_Globals
     Dim HoldVar as String
End Sub
 
Sub Activity_Pause
     HoldVar = edittext5.Text
End Sub

In the second activity access it like:

MsgBox(Main.HoldVar , "Show Main Activity Value")

 

[piero123]

i use that and dont work :/ , i change my project this is the code

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private Button1 As Button
    Private Button2 As Button
    Private EditText1 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("1")

End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub



Sub Button1_Click
    removeview
    Activity.LoadLayout("2")
End Sub
Sub removeview
Dim i As Int
For i=Activity.NumberOfViews-1 To 0 Step -1
Activity.RemoveViewAt(i)
Next
End Sub
Sub Button2_Click
    removeview
    Activity.LoadLayout("1")
End Sub

i only want all i write in the edittext1 dont delete everytime i change the layout , here is my project please check im really confused

 

[klaus]

In your first post you are speaking about two Activities !
But in your example code there is only one !?
This code works :

Sub Process_Globals
    Dim EditText_Text = "" As String
End Sub

Sub Globals
    Dim Button1 As Button
    Dim Button2 As Button
    Dim EditText1 As EditText
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Activity.LoadLayout("1")
End Sub

Sub Button1_Click
    removeview
    Activity.LoadLayout("2")
    EditText1.Text = EditText_Text
End Sub

Sub removeview
    Activity.RemoveAllViews
End Sub

Sub Button2_Click
    removeview
    EditText_Text = EditText1.Text
    Activity.LoadLayout("1")
End Sub

But if you use another Activity for layout '2' you should use margret's proposal.

 

[piero123]

thanksss that code works