Example: /ChartDirector/multishapebar

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


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

This example is the version from Sun, 17th Mar 2012.

Project "multishapebar.xojo_binary_project"
Class App Inherits Application
Const kEditClear = "&Löschen"
Const kFileQuit = "Beenden"
Const kFileQuitShortcut = ""
End Class
Class PicWindow Inherits Window
EventHandler Sub Open() // 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 Backdrop=c.makeChartPicture End EventHandler
End Class
MenuBar MenuBar1
MenuItem FileMenu = "&Ablage"
MenuItem FileQuit = "#App.kFileQuit"
MenuItem EditMenu = "&Bearbeiten"
MenuItem EditUndo = "&Rückgängig"
MenuItem UntitledMenu1 = "-"
MenuItem EditCut = "&Ausschneiden"
MenuItem EditCopy = "&Kopieren"
MenuItem EditPaste = "&Einfügen"
MenuItem EditClear = "#App.kEditClear"
MenuItem UntitledMenu0 = "-"
MenuItem EditSelectAll = "&Alles auswählen"
End MenuBar
End Project

See also:

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


💬 Ask a question or report a problem