Private Sub B4XPage_Created (Root1 As B4XView)
Root = Root1
Root.LoadLayout("MainPage")
RegisterDisplayListener
End Sub
Private Sub RegisterDisplayListener
Dim ctxt As JavaObject
ctxt.InitializeContext
Dim DisplayManager As JavaObject = ctxt.RunMethod("getSystemService", Array("display"))
Dim listener As Object = DisplayManager.CreateEventFromUI("android.hardware.display.DisplayManager.DisplayListener", "DisplayListener", Null)
DisplayManager.RunMethod("registerDisplayListener", Array(listener, Null))
End Sub
Private Sub DisplayListener_Event (MethodName As String, Args() As Object) As Object
If MethodName = "onDisplayAdded" Then
Log("mute audio!")
Else If MethodName = "onDisplayRemoved" Then
Log("unmute audio!")
End If
Return Null
End Sub