Xojo Conferences
MBSSep2018MunichDE
XDCMay2019MiamiUSA

Platforms to show: All Mac Windows Linux Cross-Platform

/ChartDirector/simplebar with ImageMapHandler
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/simplebar with ImageMapHandler
This example is the version from Wed, 13th Dec 2016.
Project "simplebar with ImageMapHandler.rbp"
Class App Inherits Application
Const kEditClear = "&Löschen"
Const kFileQuit = "Beenden"
Const kFileQuitShortcut = ""
End Class
Class PicWindow Inherits Window
Control Canvas1 Inherits Canvas
ControlInstance Canvas1 Inherits Canvas
EventHandler Sub MouseMove(X As Integer, Y As Integer) dim lines(-1) as string dim mTmp as integer = mImageMapHandler.getHotSpot(X, Y) if mTmp > 0 then lines.Append "Over item "+str(mTmp) dim index as integer dim key as string = mImageMapHandler.getKey(index) dim value as string = mImageMapHandler.getValue(index) while len(key)>0 lines.Append key+" = "+value index = index + 1 key = mImageMapHandler.getKey(index) value = mImageMapHandler.getValue(index) wend else lines.Append "Nothing" end if info.Text = Join(lines,EndOfLine) End EventHandler
EventHandler Sub Open() // fix some properties if set wrong in IDE me.DoubleBuffer = false me.EraseBackground = false #if RBVersion >= 2013.0 then me.Transparent = False #endif End EventHandler
End Control
Control Info Inherits Label
ControlInstance Info Inherits Label
End Control
EventHandler Sub Open() // The data for the bar chart dim data(-1) as double = array(85.0, 156, 179.5, 211, 123) // The labels for the bar chart dim labels(-1) as string = array("Mon", "Tue", "Wed", "Thu", "Fri") // Create a XYChart object of size 250 x 250 pixels dim c as new CDXYChartMBS(250, 250) // Set the plotarea at (30, 20) and of size 200 x 200 pixels call c.setPlotArea(30, 20, 200, 200) // Add a bar chart layer using the given data call c.addBarLayer(data) // Set the labels on the x axis. call c.xAxis.setLabels labels canvas1.Backdrop=c.makeChartPicture ImageMapString = c.getHTMLImageMap("myurl" ) mImageMapHandler = new CDImageMapHandlerMBS(ImageMapString) End EventHandler
Property ImageMapString As string
Property mImageMapHandler As CDImageMapHandlerMBS
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:

Feedback, Comments & Corrections

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




Links
MBS Xojo Chart Plugins