Estoy intentando echar a andar un ejemplo de B4XPages que funciona en B4A, a B4J.
Los primeros días, me salía el icono hamburger en laesquina superior izquierda, pero desapareció en algún momento y no consigo ver qué he tocado.
Lo he estado comparando con otro ejemplo en el que SÍ funciona, pero no consigo ver la diferencia.
Por cierto @angel_ si pruebas el que no funciona, verás que al hacer click en las líneas que me indicaste, no funciona.
ivHamburger lo cargas en "CenterPanel" donde cargas el layout "DataCards"
En DataCards esta pnlSearch con left=0, por lo que esta por encima del ivHamburger por lo que si modificas el Layout poniendo pnlSearch.left=32 ya aparecerá.
ivHamburger lo cargas en "CenterPanel" donde cargas el layout "DataCards"
En DataCards esta pnlSearch con left=0, por lo que esta por encima del ivHamburger por lo que si en el Layout pones pnlSearch.left=32 ya aparece.
Dim p As B4XView = xui.CreatePanel("")
p.Color = xui.Color_White
Dim iv As ImageView
iv.Initialize("imgHamburger")
iv.SetImage(HamburgerIcon)
p.AddView(iv, 0, 0, 32dip, 32dip)
Drawer.CenterPanel.AddView(p, 2dip, 2dip, 32dip, 32dip)
iv.PickOnBounds = True
Dim p As B4XView = xui.CreatePanel("")
p.SetColorAndBorder(xui.Color_White, 1, xui.Color_LightGray, 3)
Dim iv As ImageView
iv.Initialize("imgHamburger")
iv.SetImage(HamburgerIcon)
p.AddView(iv, 3dip, 3dip, 28dip, 28dip)
Drawer.CenterPanel.AddView(p, 2dip, 2dip, 34dip, 34dip)
iv.PickOnBounds = True