Example: /ChartDirector/multishapebar iOS

Online Documentation   -   Statistics   -   FAQ   -   Plugin Parts (All, Dependencies)   -   Class hierarchy

New in Version 22.2 22.3 22.4 22.5 23.0 23.1 23.2 23.3 23.4 23.5 24.0 24.1

The list of the   topics,   classes,   interfaces,   controls,   modules,   global methods by category,   global methods by name,   screenshots,   licenses   and   examples.

Platforms to show: All Mac Windows Linux Cross-Platform

/ChartDirector/multishapebar iOS


Required plugins for this example: MBS ChartDirector Plugin

You find this example project in your Plugins Download as a Xojo project file within the examples folder: /ChartDirector/multishapebar iOS

This example is the version from Sat, 27th Nov 2020.

Project "multishapebar iOS.xojo_binary_project"
Class App Inherits MobileApplication
End Class
Class Screen1 Inherits MobileScreen
Control ImageViewer1 Inherits MobileImageViewer
ControlInstance ImageViewer1 Inherits MobileImageViewer
Constraint Constraint 1
Constraint Constraint 2
Constraint Constraint 3
Constraint Constraint 4
End Control
EventHandler Sub Opening() // The data for the bar chart Dim data0(-1) As Double = Array( 100, 125, 245, 147.0) Dim data1(-1) As Double = Array( 85, 156, 179, 211.0) Dim data2(-1) As Double = Array( 97, 87, 56, 267.0) Dim labels(-1) As String = Array("1st Quarter", "2nd Quarter", "3rd Quarter", "4th Quarter") // Create a XYChart object of size 600 x 350 pixels Dim c As New CDXYChartMBS(600, 350) // Add a title to the chart using 14 pts Arial Bold Italic font Call c.addTitle("Annual Product Revenue", "arialbi.ttf", 14) // Set the plot area at (50, 60) and of size 500 x 240. Use two alternative // background colors (f8f8f8 and ffffff) Call c.setPlotArea(50, 60, 500, 240, &hf8f8f8, &hffffff) // Add a legend box at (55, 22) using horizontal layout, with transparent // background Dim l As CDLegendBoxMBS l=c.addLegend(55, 22, False) l.setBackground(c.kTransparent) // Set the x axis labels Call c.xAxis.setLabels labels // Draw the ticks between label positions (instead of at label positions) c.xAxis.setTickOffset(0.5) // Add a multi-bar layer with 3 data sets and 9 pixels 3D depth Dim layer As CDBarLayerMBS layer = c.addBarLayer(c.kSide, 9) Call layer.addDataSet(data0, -1, "Product A") Call layer.addDataSet(data1, -1, "Product B") Call layer.addDataSet(data2, -1, "Product C") // Set data set 1 to use a bar shape of a 6-pointed star layer.setBarShape(c.StarShape(6), 0) // Set data set 2 to use a bar shapre of a 6-sided polygon Call layer.setBarShape(c.PolygonShape(6), 1) // Set data set 3 to use an X bar shape layer.setBarShape(c.Cross2Shape, 2) // Add a title to the y-axis Call c.yAxis.setTitle("Revenue (USD in millions)") // Add a title to the x axis Call c.xAxis.setTitle("Year 2005") // Output the chart ImageViewer1.Image = c.makeChartPicture End EventHandler
End Class
Class LaunchScreen Inherits iosView
End Class
End Project

See also:

The items on this page are in the following plugins: MBS ChartDirector Plugin.


💬 Ask a question or report a problem