Hi All.
I have iSideMenu and a CustomListView.
Now if i add iSideMenu with this code in Sub Show
i have this result as Customlist
the resize does not occur
if i work without iSidemenu i have correct result:
Any idea
Thank you
Marco
I have iSideMenu and a CustomListView.
Now if i add iSideMenu with this code in Sub Show
B4X:
If pg.IsInitialized = False Then
pg.Initialize("pg")
pg.RootPanel.Color = Colors.Black
pg.RootPanel.LoadLayout("lay_home")
pg.Title = "XXXXXXX"
End If
Main.NavControl.ShowPage(pg)
Main.NavControl.ToolBarVisible = True
'InizializzoToastMessage
dt.Initialize(pg,17,True)
'Full screen
Main.NavControl.ToolBarVisible = False
Main.NavControl.SetNavigationBarVisibleAnimated(False)
Dim no As NativeObject = App
no.RunMethod("setStatusBarHidden:animated:", Array(True, False))
SetStatusBarStyleLight
'Creo SideMenu
Dim nc As NavigationController
nc.Initialize("nc")
Main.NavControl = nc
Dim lp As Page
lp.Initialize("lp")
lp.RootPanel.Color = Colors.Red
lp.RootPanel.LoadLayout("lay_home_ordini")
smc.Initialize(lp, nc, Null)
App.KeyController = smc
nc.ShowPage(pg)
Dim b1 As BarButton
b1.InitializeBitmap(KeepOriginalColors(LoadBitmap(File.DirAssets, "cart.png")), "left")
pg.TopLeftButtons = Array(b1)
i have this result as Customlist
the resize does not occur
if i work without iSidemenu i have correct result:
Any idea
Thank you
Marco