Android Question B4XPages in immersive mode

warayTek

Member
Licensed User
HI, I am trying to apply immersive mode in B4xpages.
I tried the following code below using the a library
B4X:
#Region  Project Attributes
    #ApplicationLabel: SPAv1.0
    #VersionCode: 1
    #VersionName:
    'SupportedOrientations possible values: unspecified, landscape or portrait.
    #SupportedOrientations: portrait
    #CanInstallToExternalStorage: False
#End Region

#Region  Activity Attributes
    #FullScreen: False
    #IncludeTitle: False
#End Region

'#BridgeLogger: True

Sub Process_Globals
    Public ActionBarHomeClicked As Boolean
    
End Sub

Sub Globals
    Dim immersive As ImmersiveMode
End Sub

Sub Activity_Create(FirstTime As Boolean)
    Dim pm As B4XPagesManager
    
    immersive.Initialize(Activity)
    pm.Initialize(Activity)
    
End Sub

'Template version: B4A-1.01
#Region Delegates

Sub Activity_ActionBarHomeClick
    ActionBarHomeClicked = True
    B4XPages.Delegate.Activity_ActionBarHomeClick
    ActionBarHomeClicked = False
End Sub

Sub Activity_KeyPress (KeyCode As Int) As Boolean
    Return B4XPages.Delegate.Activity_KeyPress(KeyCode)
End Sub

Sub Activity_Resume
    B4XPages.Delegate.Activity_Resume
End Sub

Sub Activity_Pause (UserClosed As Boolean)
    B4XPages.Delegate.Activity_Pause
End Sub

Sub Activity_PermissionResult (Permission As String, Result As Boolean)
    B4XPages.Delegate.Activity_PermissionResult(Permission, Result)
End Sub

Sub Create_Menu (Menu As Object)
    B4XPages.Delegate.Create_Menu(Menu)
End Sub

#if Java
public boolean _onCreateOptionsMenu(android.view.Menu menu) {
     processBA.raiseEvent(null, "create_menu", menu);
     return true;
    
}
#End If
#End Region


Sub Activity_WindowFocusChanged(HasFocus As Boolean)
    If HasFocus Then
        immersive.SetMode(immersive.SYSTEM_UI_FLAG_FULLSCREEN)
    End If
End Sub
see attached image.

any suggestions is appreciated.
 

Attachments

  • bar.png
    bar.png
    221.3 KB · Views: 140
Top