Sub Activity_Resume
If IsRelevantIntent(Activity.GetStartingIntent) Then
Dim starting As Intent = Activity.GetStartingIntent
'Log(starting)
'Log(starting.Action)
If starting.GetData.StartsWith("content") Then
Dim uri As String = starting.GetData
Try
Log("Loading bitmap from ContentUri: " & uri)
Dim bmp As Bitmap = LoadBitmapSample("ContentDir", uri, 100%x, 100%y)
Activity.SetBackgroundImage(bmp)
Catch
Log(LastException)
End Try
Else
Dim in As JavaObject = Activity.GetStartingIntent
Dim uri As String = in.RunMethod("getParcelableExtra", Array("android.intent.extra.STREAM"))
Try
Log("Loading bitmap from: " & uri)
Dim bmp As Bitmap = LoadBitmapSample("ContentDir", uri, 100%x, 100%y)
Activity.SetBackgroundImage(bmp)
Catch
Log(LastException)
End Try
End If
End If
End Sub