A simple, cross platform, pie chart class based on XUI library.
Implemented as a custom view. Add it with the designer and set the data with:
B4X:
Dim data As List
data.Initialize
data.Add(PieChart1.CreateSlice("Slice #1", 234, 0)) '0 = random color
data.Add(PieChart1.CreateSlice("Slice #2", 500, xui.Color_Red))
data.Add(PieChart1.CreateSlice("Slice #3", 20, 0))
data.Add(PieChart1.CreateSlice("Slice #4", 200, 0))
PieChart1.SetData(data)
A B4J project is attached. The class is inside.
Attachments
Last edited: