B4J Question using AB Material for website development

saeed10051 · May 23, 2020

There is a site

Stay (The F***) Home & Learn

A list of +50 high-quality resources available for free or cheaper than usual due to the COVID-19 so you can stay home and learn.

stayhomeandlearn.org

which is simple with some link and tabs and an email support
I need to know if there is a working example available to build this type of website through AB Material

Xandoca · May 23, 2020

I've made the page bellow that you can use as a starter. As I'm a ABMaterial beginner user, this is not a perfect or best solution/approach.
You can style the tabs, table (list of links), etc.
good luck.

saeed10051 · May 24, 2020

Alexandre Riani said:
I've made the page bellow that you can use as a starter. As I'm a ABMaterial beginner user, this is not a perfect or best solution/approach.
You can style the tabs, table (list of links), etc.
good luck.
View attachment 94584

Thanks Boss.

saeed10051 · May 26, 2020

Alexandre Riani said:
I've made the page bellow that you can use as a starter. As I'm a ABMaterial beginner user, this is not a perfect or best solution/approach.
You can style the tabs, table (list of links), etc.
good luck.
View attachment 94584

Hi
i am trying to run the bas file by renaming the bas file to testTemplate. Then i have added it to the abmaterial example template as an existing module. The main file i.e. http://localhost:51045/Myapp/ABMPageTemplate/ is running but when i change the address to http://localhost:51045/Myapp/testTemplate/
i get the error that resource not found. Also in the log i see the message
/Myapp/testTemplate/ Not found

Xandoca · May 26, 2020

Have you changed the page name?

B4X:

Public Name As String = "ABMPageTemplate"

Have you changed the Main class with the new name?

B4X:

    ' create the app
    Dim myApp As ABMApplication
    myApp.Initialize
        
    ' create the pages
    Dim myPage As ABMPageTemplate   'here***********
    myPage.Initialize       
        
    ' add the pages to the app
    myApp.AddPage(myPage.page)

Xandoca · May 26, 2020

When I shared the page I forgot to send you the themes I was using (ABMShared):

B4X:

' build methods for ABM objects
Sub BuildTheme(themeName As String)
    MyTheme.Initialize(themeName)
    
    ' the page theme
    MyTheme.Page.BackColor = ABM.COLOR_WHITE   
    
    MyTheme.AddCellTheme("celulacentralizadaprincipal")
    MyTheme.Cell("celulacentralizadaprincipal").Align = ABM.CELL_ALIGN_CENTER

    MyTheme.AddCellTheme("celulayellow")
    MyTheme.Cell("celulayellow").Align = ABM.CELL_ALIGN_CENTER
    MyTheme.Cell("celulayellow").BackColor = ABM.COLOR_YELLOW
    MyTheme.Cell("celulayellow").BackColorIntensity = ABM.INTENSITY_NORMAL
    'MyTheme.Cell("celulayellow").BorderRadiusTopLeftPx = 10
    'MyTheme.Cell("celulayellow").BorderRadiusTopRightPx = 10
    MyTheme.Cell("celulayellow").BorderRadiusPx = 10
    'MyTheme.Cell("celulayellow").BorderRadiusTopRightPx = 10
    

    
    MyTheme.AddRowTheme("linhayellow")
    MyTheme.Row("linhayellow").BackColor = ABM.COLOR_YELLOW
    MyTheme.Row("linhayellow").BackColorIntensity = ABM.INTENSITY_ACCENT1
    
    MyTheme.AddDividerTheme("linhadivisoariapreta")
    MyTheme.Divider("linhadivisoariapreta").Colorize(ABM.color_black)
    
#region linhas para formar a caixa de criacao de usuario
    'linha roxa superior na caixa de busca
    MyTheme.AddRowTheme("linhanovousuariosuperior")
    MyTheme.Row("linhanovousuariosuperior").BackColor = ABM.COLOR_AMBER
    MyTheme.Row("linhanovousuariosuperior").BackColorIntensity = ABM.INTENSITY_NORMAL
    MyTheme.Row("linhanovousuariosuperior").BorderRadiusTopLeftPx = 10
    MyTheme.Row("linhanovousuariosuperior").BorderRadiusTopRightPx = 10
#end region
End Sub

saeed10051 · May 26, 2020

Alexandre Riani said:

Have you changed the page name?

B4X:

Public Name As String = "ABMPageTemplate"

Have you changed the Main class with the new name?

B4X:

    ' create the app
    Dim myApp As ABMApplication
    myApp.Initialize
       
    ' create the pages
    Dim myPage As ABMPageTemplate   'here***********
    myPage.Initialize      
       
    ' add the pages to the app
    myApp.AddPage(myPage.page)

Thanks Alexandre for the guidance. I have changed the page name as follows
Public Name As String = "testTemplate"
but i am unable to understand how i should change main class. as this main class is related to myApp which is the base project, i have just added one module (the one send by you) to it.
I am attaching screen shot of the application view. with main class and other classes
Also is there a way that i create a new project instead of adding the module to existing example project.

OliverA · May 26, 2020

So for each page you want to add to your project, you
1) Create a class for that page. Base it on one of the two templates provided by ABM (or on another page you have created). Make sure you change the page name.
This is the testTemplate class that you created
2) Create an instance of this new class in Main
In your case

B4X:

' create the pages
Dim myTestPage As testTemplate
myTestPage.Initialize

You can call your page objects whatever you want, in this case I just have myTestPage.
3) Add class instance to the ABMApplication object in Main
In your case

B4X:

' add the pages to the app
myApp.AddPage(myTestPage.page)

Note: This is just a rough overview. This makes the page available in direct navigation (typing the URL in the address bar of a browser), but not in any menu that you have set up. You'll still have write additional code for such feature.

OliverA · May 26, 2020

saeed10051 said:
Also is there a way that i create a new project instead of adding the module to existing example project.

Make a copy of the Template directory. It has the minimum files you need to get a project off and going (well, plus a couple of Template classes you can use to base your various pages on).

saeed10051 · May 27, 2020

OliverA said:
So for each page you want to add to your project, you
1) Create a class for that page. Base it on one of the two templates provided by ABM (or on another page you have created). Make sure you change the page name.
This is the testTemplate class that you created
2) Create an instance of this new class in Main
In your case

B4X:

' create the pages Dim myTestPage As testTemplate myTestPage.Initialize

You can call your page objects whatever you want, in this case I just have myTestPage.
3) Add class instance to the ABMApplication object in Main
In your case

B4X:

' add the pages to the app myApp.AddPage(myTestPage.page)

Note: This is just a rough overview. This makes the page available in direct navigation (typing the URL in the address bar of a browser), but not in any menu that you have set up. You'll still have write additional code for such feature.

Hi OliverA
Thanks for the precise explanation, i have updated the code. It is working now
in browser by writing http://localhost:51045/Myapp/testTemplate/

saeed10051 · May 27, 2020

OliverA said:
Make a copy of the Template directory. It has the minimum files you need to get a project off and going (well, plus a couple of Template classes you can use to base your various pages on).

I have this template directory for which the image is attached, there are a number of files in this one, as you can see in the attached image. Are you referring to this template or some other one.

Harris · May 28, 2020

@saeed10051 , have you reviewed the Dummies tut for the basics? I assume YES since you are this far...

saeed10051 · May 28, 2020

Harris said:
@saeed10051 , have you reviewed the Dummies tut for the basics? I assume YES since you are this far...

Yes i have reviewed it. It is working now thanks for the reply from OliverA

B4J Question using AB Material for website development

saeed10051

Active Member

Stay (The F***) Home & Learn

Xandoca

Active Member

Attachments

saeed10051

Active Member

saeed10051

Active Member

Xandoca

Active Member

Xandoca

Active Member

saeed10051

Active Member

Attachments

OliverA

Expert

OliverA

Expert

saeed10051

Active Member

saeed10051

Active Member

Attachments

Harris

Expert

saeed10051

Active Member

Similar Threads

B4J Question using AB Material for website development

Active Member

Active Member

Attachments

Active Member

Active Member

Active Member

Active Member

Active Member

Attachments

Expert

Expert

Active Member

Active Member

Attachments

Expert

Active Member

Similar Threads

Privacy & Transparency

Privacy & Transparency