How to: Set the Color of the RangeControl Thumbnails (legacy)

• Aug 03, 2020
• 2 minutes to read

Note

You are viewing documentation for the legacy WPF Scheduler control. If you’re starting a new project, we strongly recommend that you use a new control declared in the DevExpress.Xpf.Scheduling namespace. If you decide to upgrade an existing project in order to switch to the updated scheduler control, see the Migration Guidelines document.

This example demonstrates how you can specify the color of the Range Control thumbnails in code.

The background color of the thumbnail is determined by the ThumbnailControl template. The Border.Background property of the thumbnail is bound to the appointment it represents and uses a custom AppointmentToColorConverter. The converter specifies the color according to words encountered in the Appointment.Location string.

Note

A complete sample project is available at https://github.com/DevExpress-Examples/how-to-set-the-color-of-the-rangecontrol-thumbnails-e5155.

MainWindow.xaml.cs

public class AppointmentToColorConverter : MarkupExtension, IValueConverter
{
    AppointmentToColorConverter instance = null;

    public AppointmentToColorConverter(){}

    public Color DefaultColor { get; set; }

    public override object ProvideValue(IServiceProvider serviceProvider)
    {
        if (instance == null)
        {
            instance = new AppointmentToColorConverter();
            instance.DefaultColor = DefaultColor;
        }
        return instance;
    }
    object IValueConverter.Convert(object value, Type targetType, object parameter, CultureInfo culture)
    {
        Appointment apt = value as Appointment;
        if (apt.Location == String.Empty)
            return Brushes.White;
        if (apt.Location.Contains("Orange"))
            return Brushes.Orange;
        if (apt.Location.Contains("Green"))
            return Brushes.Green;
        if (apt.Location.Contains("Blue"))
            return Brushes.Blue;
        return Brushes.Gray;
    }
    object IValueConverter.ConvertBack(object value, Type targetType, object parameter, CultureInfo culture)
    {
        return ((SolidColorBrush)value).Color;
    }
}

MainWindow.xaml

<dxe:RangeControl>
    <dxe:RangeControl.Resources>
        <ControlTemplate x:Key="{dxscht:RangeControlThemeKey ResourceKey=ThumbnailControlTemplate, IsThemeIndependent=true}" TargetType="{x:Type dxsch:ThumbnailControl}">
            <Border Background="{Binding Appointment, Converter={local:AppointmentToColorConverter DefaultColor=#FFBABABA}}"/>
        </ControlTemplate>
    </dxe:RangeControl.Resources>
    <dxsch:SchedulerRangeControlClient SchedulerControl="{Binding ElementName=scheduler}"/>
</dxe:RangeControl>

MainWindow.xaml.vb

Public Class AppointmentToColorConverter
    Inherits MarkupExtension
    Implements IValueConverter

    Private instance As AppointmentToColorConverter = Nothing

    Public Sub New()
    End Sub

    Public Property DefaultColor() As Color

    Public Overrides Function ProvideValue(ByVal serviceProvider As IServiceProvider) As Object
        If instance Is Nothing Then
            instance = New AppointmentToColorConverter()
            instance.DefaultColor = DefaultColor
        End If
        Return instance
    End Function
    Private Function IValueConverter_Convert(ByVal value As Object, ByVal targetType As Type, ByVal parameter As Object, ByVal culture As CultureInfo) As Object Implements IValueConverter.Convert
        Dim apt As Appointment = TryCast(value, Appointment)
        If apt.Location = String.Empty Then
            Return Brushes.White
        End If
        If apt.Location.Contains("Orange") Then
            Return Brushes.Orange
        End If
        If apt.Location.Contains("Green") Then
            Return Brushes.Green
        End If
        If apt.Location.Contains("Blue") Then
            Return Brushes.Blue
        End If
        Return Brushes.Gray
    End Function
    Private Function IValueConverter_ConvertBack(ByVal value As Object, ByVal targetType As Type, ByVal parameter As Object, ByVal culture As CultureInfo) As Object Implements IValueConverter.ConvertBack
        Return DirectCast(value, SolidColorBrush).Color
    End Function
End Class