Hi,
I found that the text on the NavigationBar is not responsive ie when I change the browser's size from desktop size to a Mobile's size, the NavigationBar Title is getting mixed with the burger menu. May be I am doing something wrong
Here is the picture of what I am trying to explain
Desktop Size
Resized to a Mobile. (The title is overlapped with the BurgerMenu)
Here is how I have coded
Here is the code for BuildNavigationBar in ABMShared. I have not changed anything, it is the one that comes with the ABM Template.
I would also like to know that whether it is possible to control the text size of the title displayed on the NavigationBar
Thanks
I found that the text on the NavigationBar is not responsive ie when I change the browser's size from desktop size to a Mobile's size, the NavigationBar Title is getting mixed with the burger menu. May be I am doing something wrong
Here is the picture of what I am trying to explain
Desktop Size
Resized to a Mobile. (The title is overlapped with the BurgerMenu)
Here is how I have coded
B4X:
Public Sub BuildPage()
...
ABMShared.BuildNavigationBar(page, "My HomePage",Null, "", "", "")
...
End Sub
Here is the code for BuildNavigationBar in ABMShared. I have not changed anything, it is the one that comes with the ABM Template.
B4X:
Sub BuildNavigationBar(page As ABMPage, Title As String, logo As String, ActiveTopReturnName As String, ActiveSideReturnName As String, ActiveSideSubReturnName As String) 'ignore
' we have to make an ABMImage from our logo url
Dim sbtopimg As ABMImage
sbtopimg.Initialize(page, "sbtopimg", logo, 1)
' sbtopimg.SetFixedSize(236, 49)
page.NavigationBar.Initialize(page, "nav1", ABM.SIDEBAR_MANUAL_ALWAYSHIDE, Title, True, True, 330, 48, sbtopimg, ABM.COLLAPSE_ACCORDION, "nav1theme")
page.NavigationBar.IsTextSelectable = False
page.NavigationBar.SideBarSubItemsArrowAlignRight = True
' page.NavigationBar.UseAlternativeScrollBar(ABM.COLOR_TEAL, ABM.INTENSITY_DARKEN2, 1.0)
page.NavigationBar.TopBarDropDownConstrainWidth = False
page.NavigationBar.ActiveTopReturnName = ActiveTopReturnName
page.NavigationBar.ActiveSideReturnName = ActiveSideReturnName
page.NavigationBar.ActiveSideSubReturnName = ActiveSideSubReturnName
' you must add at least ONE dummy item if you want to add items to the topbar in ConnectNaviagationBar
page.NavigationBar.AddTopItem("DUMMY", "{NBSP}", "", "", False)
' you must add at least ONE dummy item if you want to add items to the sidebar
page.NavigationBar.AddSideBarItem("DUMMY", "{NBSP}", "", "")
End Sub
I would also like to know that whether it is possible to control the text size of the title displayed on the NavigationBar
Thanks