Hi there
I need help in relation to perhaps filling my container up or making the background color grey, blue areas on attached image.
I have used the ListItemImageTitleDescription below to add my items and passed a container theme with grey and lighten 5 intensity.
This is a listitem with an image, title and description.
I need help in relation to perhaps filling my container up or making the background color grey, blue areas on attached image.
I have used the ListItemImageTitleDescription below to add my items and passed a container theme with grey and lighten 5 intensity.
B4X:
Sub ListItemImageTitleDescription(page as ABMPage, id As String, image As String, Title As String, Subtitle As String, TitleTheme As String, DescriptionTheme As String, bIsCircular As Boolean, ContainerTheme as string) As ABMContainer
Dim ItemCont As ABMContainer
ItemCont.Initialize(page, id, ContainerTheme )
ItemCont.AddRowsM(1,False,6,0, "").AddCellsOSMP(1,0,0,0,3,2,2,0,0,16,0,"").AddCellsOS(1,0,0,0,9,10,10,"")
ItemCont.BuildGrid 'IMPORTANT once you loaded the complete grid AND before you start adding components
Dim SubItemCont As ABMContainer
SubItemCont.Initialize(page, id & "SubItemCont", ContainerTheme )
SubItemCont.AddRowsM(1,False, 0,0,"").AddCells12MP(1,-6,0,0,0,"").AddCells12(1,"")
SubItemCont.BuildGrid 'IMPORTANT once you loaded the complete grid AND before you start adding components
ItemCont.Cell(1,2).AddComponent(SubItemCont)
Dim img As ABMImage
img.Initialize(page, id & "img", image, 1)
img.SetFixedSize(48,48)
img.IsCircular = bIsCircular
img.IsResponsive = True
ItemCont.Cell(1,1).AddComponent(img)
Dim lbl1 As ABMLabel
lbl1.Initialize(page, id & "lbl1", Title, ABM.SIZE_H6, False, TitleTheme)
lbl1.VerticalAlign = True
SubItemCont.Cell(1,1).AddComponent(lbl1)
Dim lbl2 As ABMLabel
lbl2.Initialize(page, id & "lbl2", Subtitle, ABM.SIZE_H6, False, DescriptionTheme)
lbl2.VerticalAlign = True
SubItemCont.Cell(1,2).AddComponent(lbl2)
Return ItemCont
End SubThis is a listitem with an image, title and description.
