Share My Creation [ABMaterial] framework for WebApps in B4J

ShaneG30

Well-Known Member
Licensed User
Yup, I got it. (Referring to the deleted post asking if I got the email)
 
Last edited:

Harris

Well-Known Member
Licensed User
Thanks Harris, getting there slowly. This worked but now I have a blank row between each row, I do not want this, I need each row to join below with the one above. How can I remove this. Here is my code in case I have it wrong.

B4X:
    ' create the page grid
    page.AddRows(1,True,"blackbackrow").AddCellsOS(1,0,0,0,12,12,12,"")
     page.AddRows(1,True,"blackbackrow").AddCellsOS(1,0,0,0,3,3,3,"").AddCellsOS(1,0,0,0,3,3,3,"").AddCellsOS(1,0,0,0,1,1,1,"").AddCellsOS(1,0,0,0,2,2,2,"").AddCellsOS(1,0,0,0,3,3,3,"")
    page.AddRows(1,True,"blackbackrow").AddCellsOS(1,0,0,0,12,12,12,"")
    'IMPORTANT once you loaded the complete grid AND before you start adding components
    page.BuildGrid
 
    ' load page images
    Dim img1 As ABMImage
    img1.Initialize(page, "img1","../images/freephone2.png",1)
    Dim img2 As ABMImage
    img2.Initialize(page, "img2","../images/logo.png",1)
    Dim img3 As ABMImage
    img3.Initialize(page, "img3","../images/shoppingcart.png",1)
    Dim img4 As ABMImage
    img4.Initialize(page, "img4","../images/nationwide.png",1)
 
    ' Build Header
    page.Cell(1,1).AddComponent(ABMShared.BuildSpan(page,"par2","."))
    page.Cell(2,1).AddComponent(ABMShared.BuildSpan(page,"par2",".")) 
    page.Cell(2,2).AddComponent(img4)
    page.Cell(2,3).AddComponent(img3)
    page.Cell(2,3).AddComponent(ABMShared.BuildParagraphWH(page,"par4","Cart Items #0"))
    page.Cell(2,4).AddComponent(ABMShared.BuildSpan(page,"par2",".")) 
    page.Cell(2,5).AddComponent(img1)
    page.Cell(3,1).AddComponent(img2)
thanks Phil
Those are not blank rows, they are default margins (padding) of 20px.
use: AddCellsOSMP (margin, padding) for the effect you are looking for.
page.AddRowsM( 1,True, 15, 0, "rowtheme").AddCellsOSMP(1,0,0,0,4,4,4,5,5,30,10,"").AddCellsOSMP(1,0,0,0,4,4,4,5,5,30,10,"").AddCellsOSMP(1,0,0,0,4,4,4,5,5,30,10,"")

There are 4 AddCell types:
AddCells12
AddCells12MP
AddCellsOS
AddCellsOSMP

http://81.165.232.188:8081/demo/GridsPage/

Link to on-line demo explaining each part...
 

Beja

Expert
Licensed User
I have one question/wish... will there be a "created with ABMaterial" type of control?
For the free version, yes I agree.. but for production apps you may need to create your own watermarks and you definitely don't want to confuse users.
 

hibrid0

Active Member
Licensed User
I recveive this on DEMO srvr.AddBackgroundWorker("ABMCacheScavenger")

B4X:
B4J version: 4.70
Parsing code.    (0.77s)
Compiling code.    Error
Error compiling program.
Error description: Unknown member: addbackgroundworker
Occurred on line: 146
srvr.AddBackgroundWorker("ABMCacheScavenger")
Word: addbackgroundworker
I delete the old ABMaterial and replace the libraries from Chrismas Edition
 
Top