See zip file, please
I have this Service
and this Activity:
I need to do this note persistent; it will no cleared from Notifications list when you push "Clear" notifications.
Is possible this?
Thank you!
:
I have this Service
B4X:
'Service -llamando- module
Sub Process_Globals
End Sub
Sub Service_Create
End Sub
Sub Service_Start
CallSubDelayed(Main, "Nota_Servicio_Iniciado")
End Sub
B4X:
'Activity module
Sub Process_Globals
'These global variables will be declared once when the application starts.
'These variables can be accessed from all modules.
'Iconos e imágenes
Dim Nota As Notification
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.
End Sub
Sub Activity_Create(FirstTime As Boolean)
If FirstTime Then ' Cargamos los Iconos a usar
If IsPaused(srv_llamada) Then StartService(srv_llamada)
End If
End Sub
Sub Activity_Resume
End Sub
Sub Activity_Pause (UserClosed As Boolean)
StopService(srv_llamada)
Activity.Finish
ExitApplication
End Sub
Sub Nota_Servicio_Iniciado
Nota.Initialize
Nota.OnGoingEvent=True
Nota.AutoCancel = False
Nota.Vibrate = False
Nota.Sound = False
Nota.Icon = "icon"
Nota.SetInfo("My Note", "I don't want be cleared!","Main")
Nota.OnGoingEvent=False
Dim r As Reflector
r.Target = Nota
r.SetField("tickerText", "My Note; Servicio iniciado", "java.lang.String")
Nota.Notify(1)
End Sub
I need to do this note persistent; it will no cleared from Notifications list when you push "Clear" notifications.
Is possible this?
Thank you!
: