Xojo Conferences
MBSSep2018MunichDE
XDCMay2019MiamiUSA

Platforms to show: All Mac Windows Linux Cross-Platform

/ChartDirector/threedscattergroups
Function:
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/threedscattergroups
This example is the version from Fri, 2nd Aug 2012.
Project "threedscattergroups.rbp"
Class App Inherits Application
Const kEditClear = "&Löschen"
Const kFileQuit = "Beenden"
Const kFileQuitShortcut = ""
End Class
Class Window1 Inherits Window
EventHandler Sub Open() dim r0 as new CDRanSeriesMBS(7) dim xData0() as double = r0.getSeries(100, 100, -10, 10) dim yData0() as double = r0.getSeries(100, 0, 0, 20) dim zData0() as double = r0.getSeries(100, 100, -10, 10) // The random XYZ data for the second 3D scatter group dim r1 as new CDRanSeriesMBS(4) dim xData1() as double = r1.getSeries(100, 100, -10, 10) dim yData1() as double = r1.getSeries(100, 0, 0, 20) dim zData1() as double = r1.getSeries(100, 100, -10, 10) // The random XYZ data for the third 3D scatter group dim r2 as new CDRanSeriesMBS(8) dim xData2() as double = r2.getSeries(100, 100, -10, 10) dim yData2() as double = r2.getSeries(100, 0, 0, 20) dim zData2() as double = r2.getSeries(100, 100, -10, 10) // Create a ThreeDScatterChart object of size 800 x 520 pixels dim c as new CDThreeDScatterChartMBS(800, 520) // Add a title to the chart using 20 points Times New Roman Italic font call c.addTitle("3D Scatter Groups ", "timesi.ttf", 20) // Set the center of the plot region at (350, 240), and set width x depth x // height to 360 x 360 x 270 pixels c.setPlotRegion(350, 240, 360, 360, 270) // Set the elevation and rotation angles to 15 and 30 degrees c.setViewAngle(15, 30) // Add a legend box at (640, 180) call c.addLegend(640, 180) // Add 3 scatter groups to the chart with 9 pixels glass sphere symbols of red // (ff0000), green (00ff00) and blue (0000ff) colors call c.addScatterGroup(xData0, yData0, zData0, "Alpha", c.kGlassSphere2Shape, 9, &Hff0000) call c.addScatterGroup(xData1, yData1, zData1, "Beta", c.kGlassSphere2Shape, 9, &H00ff00) call c.addScatterGroup(xData2, yData2, zData2, "Gamma", c.kGlassSphere2Shape, 9, &H0000ff) // Set the x, y and z axis titles call c.xAxis.setTitle("X-Axis Place Holder") call c.yAxis.setTitle("Y-Axis Place Holder") call c.zAxis.setTitle("Z-Axis Place Holder") // 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

Feedback, Comments & Corrections

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





Links
MBS Xojo PDF Plugins