B4J Tutorial [SithasoDaisy5] Creating your Organogram / Family tree

Hi Fam

With SithasoDaisy5, you will be able to create Organograms / Family Trees. Drop a SDUI5TreeSpider on your form and whala!

This is wrapped from this GitHub Project

Sub Show(MainApp As SDUI5App)
    app = MainApp
    BANano.LoadLayout(app.PageView, "treespiderview")
    pgIndex.UpdateTitle("SDUI5TreeSpider")
    '
    tsOrganogram.Clear
    tsOrganogram.AddItem("", "1", "Abayomi Amusa", "Manager", "Lagos, Nigeria", "")
    tsOrganogram.AddItem("1", "2", "Trey Anderson", "Product Manager", "California, United States", "")
    tsOrganogram.AddItem("1", "3", "Troy Manuel", "Software Developer", "Alberta, Canada", "")
    tsOrganogram.AddItem("1", "4", "Rebecca Oslon", "Software Developer", "London, United Kingdom", "")
    tsOrganogram.AddItem("1", "5", "David Scheg", "Product Designer", "Jiaozian, China", "")
    tsOrganogram.AddItem("2", "6", "James Zucks", "DevOps", "Accra, Ghana", "")
    tsOrganogram.AddItem("2", "7", "Zu Po Xe", "Backend Developer", "Johanesburg, South Africa", "")
    tsOrganogram.AddItem("2", "8", "Scott Ziagler", "FrontEnd Developer Intern", "", "")
    tsOrganogram.AddItem("7", "9", "Xervia Allero", "FrontEnd Developer Intern", "", "")
    tsOrganogram.AddItem("3", "10", "Adebowale Ajanlekoko", "Fullstack Developer", "", "")
    tsOrganogram.Refresh
End Sub

Enjoy!

 

[Mashiane]

Other Variations - default

 

[Mashiane]

 

[Mashiane]

 

[Mashiane]

Sub Show(MainApp As SDUI5App)
    app = MainApp
    BANano.LoadLayout(app.PageView, "treespiderview")
    pgIndex.UpdateTitle("SDUI5TreeSpider")
    '
    tsOrganogram.Clear
    tsOrganogram.AddItem("", "1", "Abayomi Amusa", "Manager", "Lagos, Nigeria", "./assets/face1.jpg")
    tsOrganogram.AddItem("1", "2", "Trey Anderson", "Product Manager", "California, United States", "./assets/face2.jpg")
    tsOrganogram.AddItem("1", "3", "Troy Manuel", "Software Developer", "Alberta, Canada", "./assets/face3.jpg")
    tsOrganogram.AddItem("1", "4", "Rebecca Oslon", "Software Developer", "London, United Kingdom", "./assets/face4.jpg")
    tsOrganogram.AddItem("1", "5", "David Scheg", "Product Designer", "Jiaozian, China", "./assets/face5.jpg")
    tsOrganogram.AddItem("2", "6", "James Zucks", "DevOps", "Accra, Ghana", "./assets/face6.jpg")
    tsOrganogram.AddItem("2", "7", "Zu Po Xe", "Backend Developer", "Johanesburg, South Africa", "./assets/face7.jpg")
    tsOrganogram.AddItem("2", "8", "Scott Ziagler", "FrontEnd Developer Intern", "", "./assets/face8.jpg")
    tsOrganogram.AddItem("7", "9", "Xervia Allero", "FrontEnd Developer Intern", "", "./assets/face9.jpg")
    tsOrganogram.AddItem("3", "10", "Adebowale Ajanlekoko", "Fullstack Developer", "", "./assets/face10.jpg")
    tsOrganogram.Refresh
End Sub