OK I'm tired and probably doing something stupidly wrong here.
If I use this code on my homepage I get a working ABMDatetimepicker....
but when I use this on a modalsheet it doesn't work....
On the former I get a picker as per usual, on the latter I get something that seems to want to work but the usual picker pop up doesn't appear.
Any ideas?
If I use this code on my homepage I get a working ABMDatetimepicker....
B4X:
Sub ConnectPage()
' ConnectNavigationBar2 is purposely built for public pages... It does not require a login to view
ABMShared.ConnectNavigationBar2(page, "Home", "Home", "Home", Not(ws.Session.GetAttribute2("IsAuthorized", "") = ""))
Dim ABMGenPurchaseOrdersdate As ABMDateTimePicker = ABMShared.BuildDatePicker (page,"dpicker",ABM.DATETIMEPICKER_TYPE_DATE,0,"PO Date","")
page.Cell(2,2).AddComponent(ABMGenPurchaseOrdersdate)
but when I use this on a modalsheet it doesn't work....
B4X:
'║ 10,1 ║
'╚═══════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════════╝
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCells12(1,"")
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCellsOS(2,0,0,0,6,6,6,"")
ABMGenPurchaseOrdersModal.Content.AddRows(2,True,"").AddCells12(1,"")
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCellsOS(2,0,0,0,6,6,6,"").AddCellsOS(4,0,0,0,12,6,6,"")
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCells12(1,"")
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCellsOS(2,0,0,0,12,12,6,"")
ABMGenPurchaseOrdersModal.Content.AddRows(1,True,"").AddCellsOS(4,0,0,0,6,3,3,"")
ABMGenPurchaseOrdersModal.Content.AddRows(2,True,"").AddCells12(1,"")
ABMGenPurchaseOrdersModal.Content.BuildGrid ' IMPORTANT!
#End Region
Dim ABMGenPurchaseOrdersTitleMessage As ABMLabel
ABMGenPurchaseOrdersTitleMessage.Initialize(page, "ABMGenPurchaseOrdersTitleMessage", "Enter all fields for this order - PO Number will be generated on save" , ABM.SIZE_PARAGRAPH, False, "")
ABMGenPurchaseOrdersTitleMessage.IsBlockQuote = True
ABMGenPurchaseOrdersModal.Content.CellR(0,1).AddComponent(ABMGenPurchaseOrdersTitleMessage)
Dim Seperator As ABMDivider
Seperator.Initialize(page,"Seperator","")
ABMGenPurchaseOrdersModal.Content.Cell(1,1).AddComponent(Seperator)
Dim ABMGenPurchaseOrdersdate As ABMDateTimePicker = ABMShared.BuildDatePicker (page,"dpicker",ABM.DATETIMEPICKER_TYPE_DATE,0,"PO Date","")
ABMGenPurchaseOrdersModal.Content.Cell(2,1).AddComponent(ABMGenPurchaseOrdersdate)
On the former I get a picker as per usual, on the latter I get something that seems to want to work but the usual picker pop up doesn't appear.
Any ideas?