How to: Set Custom Work Time Intervals (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 to set a custom work time for each day and resource.

To do this, handle the SchedulerControl.QueryWorkTime event, check values of the QueryWorkTimeEventArgs.Interval and QueryWorkTimeEventArgs.Resource properties and set the QueryWorkTimeEventArgs.WorkTime property value, as required.

C#

using DevExpress.XtraScheduler;
using DevExpress.Xpf.Scheduler;
//...

// Create a collection of different worktime intervals.
TimeOfDayInterval[] workTimes = new TimeOfDayInterval[] {
    new TimeOfDayInterval(TimeSpan.FromHours(0), TimeSpan.FromHours(16)),
    new TimeOfDayInterval(TimeSpan.FromHours(10), TimeSpan.FromHours(20)),
    null,
    new TimeOfDayInterval(TimeSpan.FromHours(7), TimeSpan.FromHours(15)),
    new TimeOfDayInterval(TimeSpan.FromHours(16), TimeSpan.FromHours(24)),
        };

private void schedulerControl1_QueryWorkTime(object sender, QueryWorkTimeEventArgs e) {

    if(schedulerControl1.Storage.ResourceStorage == null)
        return;

    int resourceIndex = schedulerControl1.Storage.ResourceStorage.Items.IndexOf(e.Resource);
    if(resourceIndex >= 0) {
        if(resourceIndex == 0) {
        // Specify alternate worktimes for odd and even days.
            if((e.Interval.Start.Day % 2) == 0)
                e.WorkTime = workTimes[resourceIndex % workTimes.Length];
            else
                e.WorkTime = TimeOfDayInterval.Empty;
        }
        else {
            // Specify worktime interval if the current date is treated as a working day.
            if (schedulerControl1.WorkDays.IsWorkDay(e.Interval.Start.Date))
                e.WorkTime = workTimes[resourceIndex % workTimes.Length];
        }
    }
}

VB.NET

Imports DevExpress.XtraScheduler
Imports DevExpress.Xpf.Scheduler
' ...

' Create a collection of different worktime intervals.
Private workTimes As TimeOfDayInterval() = New TimeOfDayInterval()  _
    { New TimeOfDayInterval(TimeSpan.FromHours(0), TimeSpan.FromHours(16)),  _
    New TimeOfDayInterval(TimeSpan.FromHours(10), TimeSpan.FromHours(20)),  _
    Nothing, New TimeOfDayInterval(TimeSpan.FromHours(7), TimeSpan.FromHours(15)),  _
    New TimeOfDayInterval(TimeSpan.FromHours(16), TimeSpan.FromHours(24)) }

Private Sub schedulerControl1_QueryWorkTime(ByVal sender As Object,  _
    ByVal e As QueryWorkTimeEventArgs)

    If schedulerControl1.Storage.ResourceStorage Is Nothing Then
        Return
    End If

    Dim resourceIndex As Integer = schedulerControl1.Storage.ResourceStorage.Items.IndexOf(e.Resource)
    If resourceIndex >= 0 Then
        If resourceIndex = 0 Then
        ' Specify alternate worktimes for odd and even days.
            If (e.Interval.Start.Day Mod 2) = 0 Then
                e.WorkTime = workTimes(resourceIndex Mod workTimes.Length)
            Else
                e.WorkTime = TimeOfDayInterval.Empty
            End If
        Else
            ' Specify worktime interval if the current date is treated as a working day.
            If schedulerControl1.WorkDays.IsWorkDay(e.Interval.Start.Date) Then
                e.WorkTime = workTimes(resourceIndex Mod workTimes.Length)
            End If
        End If
    End If
End Sub

XAML

<dxsch:SchedulerControl Name="schedulerControl1"
                        QueryWorkTime="schedulerControl1_QueryWorkTime"/>