Sub Activity_Resume
Dim in As Intent
in = Activity.GetStartingIntent
If in <> Null Then
If in.HasExtra("GetSettings") Then
Dim callback As String = in.GetExtra("Callback")
Dim TSrunning As String = in.GetExtra("Running")
WidgetService.isTSRunning = TSrunning = "True"
LogColor(" PROVIDER: GetStartingIntent", Colors.Red)
LogColor(" Came from: " & callback, Colors.red)
LogColor(" RUNNING: " & WidgetService.isTSRunning, Colors.red)
End If
End If
StartServiceAt(WidgetService, (DateTime.Now + (TickTime * DateTime.TicksPerSecond)), True)
Activity.finish
End Sub