Tip: the correct way to work with Activity.GetStartingIntent:
B4X:
Sub Process_Globals
Private OldIntent As Intent
End Sub
Sub ActivityResume
Dim in As Intent = Activity.GetStartingIntent
If in.IsInitialized And in <> OldIntent Then
OldIntent = in
'....
End If
Tip: the correct way to work with Activity.GetStartingIntent:
B4X:
Sub Process_Globals
Private OldIntent As Intent
End Sub
Sub ActivityResume
Dim in As Intent = Activity.GetStartingIntent
If in.IsInitialized And in <> OldIntent Then
OldIntent = in
'....
End If