I call an activity from my main activity and pass the ME object, call the callsub2 from the open activity and it does not activate the sub on the main activity.
Main Activity call second activity:
Calling sub from second activity:
sub on main activity:
I've tried not closing the activity and still nothing..
Main Activity call second activity:
B4X:
Sub Keys_Click
actCompanySelect.bShowOnlyMK = False
actCompanySelect.oClassCalled = Me
actCompanySelect.strCompFileLoc = strMKDirLoc
actCompanySelect.strCompFileLocMembers = strMMDirLoc
StartActivity(actCompanySelect)
End SubCalling sub from second activity:
B4X:
Sub btCSOK_Click
' If iRowSelect <> -1 Then
Dim R(3) As Object
R(0) = tblCS.GetValue(1,iRowSelect)
R(1) = tblCS.GetValue(2,iRowSelect)
R(2) = tblCS.GetValue(3, iRowSelect)
CallSub2(oClassCalled,"AsignCompanySelect",R)
CallSub(oClassCalled, "AsignCompanySelect")
' End If
Activity.Finish
End Subsub on main activity:
B4X:
Sub AsignCompanySelect(data() As Object)
'kinda like a raised event.
strCompKeyName = data(0)
strCompName = data(1)
strCompID = data(2)
Dim sKey As String
If strCompID.SubString2(0,2) = "MK" Then
sKey = "MK"
Else
sKey = "MMK"
End If
lbKeyUsed.Visible = True
lbKeyUsed.Text = strCompKeyName & " - " & sKey
lbKeyUsed.TextColor = Colors.Black
End SubI've tried not closing the activity and still nothing..