DashboardItemElementCustomColorEventArgs.Color Property
Gets or sets the color of the dashboard item element.
Namespace: DevExpress.DashboardWin
Assembly: DevExpress.Dashboard.v19.2.Win.dll
Declaration
Property Value
Type | Description |
---|---|
Color | A Color that is the ARGB color. |
Remarks
To specify the required dashboard item element, use the DashboardItemElementCustomColorEventArgs.TargetElement and DashboardItemElementCustomColorEventArgs.Measures properties.
Example
The following example demonstrates how to color dashboard item elements using the DashboardViewer.DashboardItemElementCustomColor event.
In this example, chart series points, whose values exceed specified thresholds, are colored in green. Chart series points, whose values fall below specified thresholds, are colored in red.
Pie segments, whose contributions in total fall below the specified threshold, are colored in orange.
Note
A complete sample project is available at https://github.com/DevExpress-Examples/how-to-color-dashboard-item-elements-in-the-winforms-viewer-t188083.
Imports System.Drawing
Imports DevExpress.XtraEditors
Imports DevExpress.DashboardWin
Imports DevExpress.DashboardCommon
Imports DevExpress.DashboardCommon.ViewerData
Namespace Dashboard_ElementCustomColor
Partial Public Class Form1
Inherits XtraForm
Public Sub New()
InitializeComponent()
dashboardViewer1.LoadDashboard("..\..\Data\Dashboard.xml")
End Sub
Private Sub dashboardViewer1_DashboardItemElementCustomColor(ByVal sender As Object, _
ByVal e As DashboardItemElementCustomColorEventArgs) _
Handles dashboardViewer1.DashboardItemElementCustomColor
Dim data As MultiDimensionalData = e.Data
Dim currentElement As AxisPointTuple = e.TargetElement
If e.DashboardItemName = "chartDashboardItem1" Then
Dim country As String = _
currentElement.GetAxisPoint(DashboardDataAxisNames.ChartSeriesAxis).Value.ToString()
Dim value As Decimal = _
CDec((data.GetSlice(currentElement)).GetValue(e.Measures(0)).Value)
If country = "UK" AndAlso value > 50000 OrElse country = "USA" AndAlso value > 100000 _
Then
e.Color = Color.DarkGreen
Else
e.Color = Color.DarkRed
End If
End If
If e.DashboardItemName = "pieDashboardItem1" Then
Dim value As Decimal = _
CDec((data.GetSlice(currentElement)).GetValue(data.GetMeasures()(0)).Value)
If value < 100000 Then
e.Color = Color.Orange
End If
End If
End Sub
End Class
End Namespace
Related GitHub Examples
The following code snippet (auto-collected from DevExpress Examples) contains a reference to the Color property.
Note
The algorithm used to collect these code examples remains a work in progress. Accordingly, the links and snippets below may produce inaccurate results. If you encounter an issue with code examples below, please use the feedback form on this page to report the issue.