Infragistics logo
메뉴
.NET and JavaScript UI Controls
Version

ScrollDayIntoView(DateTime) Method

Scrolls the passed-in date into view. If already visible, the method does nothing and returns. If not already visible, the Week containing the passed-in date is made to be the first or last visible Week.
Syntax
'Declaration
 
Public Overloads Sub ScrollDayIntoView( _
   ByVal date As Date _
) 
public void ScrollDayIntoView( 
   DateTime date
)

Parameters

date
The date of the Day to be scrolled into view
Remarks

This overload of the ScrollDayIntoView method will only scroll the control by as much as is necessary to ensure that the specified Day is in view.

Example
This example optimizes the control's display so that only the day with the most appointments is visible.

Imports Infragistics.Win
Imports Infragistics.Win.UltraWinSchedule
Imports Infragistics.Win.UltraWinSchedule.MonthViewSingle

    Private Sub OptimizeControlForAppointmentDisplay()

        Dim yesterday As DateTime = DateTime.Today.AddDays(-1)
        Dim today As DateTime = DateTime.Today
        Dim tomorrow As DateTime = DateTime.Today.AddDays(1)
        Dim i As Integer

        '	If there are no activities, let's add a few
        '	Add appointments
        If Me.ultraMonthViewSingle1.CalendarInfo.Appointments.Count = 0 Then

            For i = 1 To 5
                Me.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(yesterday, "Yesterday's appointment " + i.ToString())
            Next

            For i = 1 To 3
                Me.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(today, "Today's appointment " + i.ToString())
            Next

            For i = 1 To 10
                Me.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(tomorrow, "Tomorrow's appointment " + i.ToString())
            Next
        End If

        '	Add notes
        If Me.ultraMonthViewSingle1.CalendarInfo.Notes.Count = 0 Then

            Me.ultraMonthViewSingle1.CalendarInfo.Notes.Add(yesterday, "Yesterday's note " + i.ToString())

            For i = 1 To 2
                Me.ultraMonthViewSingle1.CalendarInfo.Notes.Add(today, "Today's note " + i.ToString())
            Next
            For i = 1 To 5
                Me.ultraMonthViewSingle1.CalendarInfo.Notes.Add(tomorrow, "Tomorrow's note " + i.ToString())
            Next
        End If

        '	Add a holiday
        If Me.ultraMonthViewSingle1.CalendarInfo.Holidays.Count = 0 Then
            Me.ultraMonthViewSingle1.CalendarInfo.Holidays.Add(yesterday, "My 2-day Holiday")
        End If

        '	First let's determine which day has the most activity. We do this by counting the occurrences of a given date
        '	in all the appointments' StartDateTime property, keeping track of the one with the most occurrences
        Dim dateWithMostActivity As DateTime = DateTime.Today
        Dim count As Integer = 0
        Dim tempCount As Integer = 0
        Dim outer As Appointment
        Dim inner As Appointment
        For Each outer In Me.ultraMonthViewSingle1.CalendarInfo.Appointments
            tempCount = 0
            For Each inner In Me.ultraMonthViewSingle1.CalendarInfo.Appointments
                If inner.StartDateTime.Date = outer.StartDateTime Then tempCount += 1
            Next
            '	If this date has more appointments that all others before
            '	it, adjust the count and set the new dateWithMostActivity
            If tempCount > count Then
                count = tempCount
                dateWithMostActivity = outer.StartDateTime
            End If
        Next

        '	If there are no appointments, return without doing anything
        If count = 0 Then Return

        '	Set the CalendarInfo object's FirstDayOfWeek property to the same day of the week
        '	as the day that has the most appointments
        Me.ultraMonthViewSingle1.CalendarInfo.FirstDayOfWeek = dateWithMostActivity.DayOfWeek

        '	Set the Visible property of all DayOfWeek objects to false,
        '	except for the one that we want to see
        Dim dow As Infragistics.Win.UltraWinSchedule.DayOfWeek
        For Each dow In Me.ultraMonthViewSingle1.CalendarInfo.DaysOfWeek
            If dow.DayOfTheWeek <> dateWithMostActivity.DayOfWeek Then dow.Visible = False Else dow.Visible = True
        Next

        '	Set the VisibleWeeks property to 1, so we only display the day
        '	with the most activity
        Me.ultraMonthViewSingle1.VisibleWeeks = 1

        '	Set the CalendarInfo object's ActiveDay property to the same day as the
        '	date with the most activity
        Me.ultraMonthViewSingle1.CalendarInfo.ActiveDay = Me.ultraMonthViewSingle1.CalendarInfo.GetDay(dateWithMostActivity, True)

        '	Scroll the day into view to ensure that it is visible
        Me.ultraMonthViewSingle1.ScrollDayIntoView(dateWithMostActivity, True)

        '	Since our task here is to optimize the control's display for Appointments,
        '	let's use the control's ActivityDisplayStyle property to suppress the displaying
        '	of other activities (Notes and Holidays).
        Me.ultraMonthViewSingle1.ActivityDisplayStyle = ActivityDisplayStyleEnum.Appointments

        '	Dirty and verify all UIElements to update the display
        Me.ultraMonthViewSingle1.UIElement.DirtyChildElements()
        Me.ultraMonthViewSingle1.UIElement.VerifyChildElements()

        '	Get the UIElement associated with the day that has the most activity. Then we can use its MoreActivityIndicatorVisible property
        '	to determine whether there are any remaining appointments that are not being displayed. If there are, we will set the DayOfWeekHeadersVisible property to false, which will give us a little
        '	more space in which to display the appointments. Note that we can use the ActiveDay as the 'context' parameter to the GetDescendant method, since we set the ActiveDay a few lines above
        '   to the day with the most appointments
        Dim dayUI As Infragistics.Win.UltraWinSchedule.MonthViewSingle.DayUIElement = Me.ultraMonthViewSingle1.UIElement.GetDescendant(GetType(DayUIElement), Me.ultraMonthViewSingle1.CalendarInfo.ActiveDay)
        If Not dayUI Is Nothing And dayUI.MoreActivityIndicatorVisible Then
            Me.ultraMonthViewSingle1.DayOfWeekHeadersVisible = False

            '   Since we are hiding the DayOfWeek headers, the name of the
            '   day of the week will not be displayed anywhere, so set the DayDisplayStyle
            '   property to Full so that it is displayed in the day header
            Me.ultraMonthViewSingle1.DayDisplayStyle = DayDisplayStyleEnum.Full
        End If

    End Sub
using Infragistics.Win;
using Infragistics.Win.UltraWinSchedule;
using Infragistics.Win.UltraWinSchedule.MonthViewSingle;
using System.Diagnostics;

		private void OptimizeControlForAppointmentDisplay()
		{

			//	Declare some date variables to work with
			DateTime yesterday = DateTime.Today.AddDays( -1.0F );
			DateTime today = DateTime.Today;
			DateTime tomorrow = DateTime.Today.AddDays( 1.0F );

			//	If there are no activities, let's add a few
			//	Add appointments
			if ( this.ultraMonthViewSingle1.CalendarInfo.Appointments.Count == 0 )
			{
				for ( int i = 1; i <= 5; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(yesterday, "Yesterday's appointment " + i.ToString() );

				for ( int i = 1; i <= 3; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(today, "Today's appointment " + i.ToString() );

				for ( int i = 1; i <= 10; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Appointments.Add(tomorrow, "Tomorrow's appointment " + i.ToString() );
			}

			//	Add notes
			if ( this.ultraMonthViewSingle1.CalendarInfo.Notes.Count == 0 )
			{
				for ( int i = 1; i <= 1; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Notes.Add(yesterday, "Yesterday's note " + i.ToString() );

				for ( int i = 1; i <= 2; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Notes.Add(today, "Today's note " + i.ToString() );

				for ( int i = 1; i <= 5; i ++ )
					this.ultraMonthViewSingle1.CalendarInfo.Notes.Add(tomorrow, "Tomorrow's note " + i.ToString() );
			}

			//	Add a holiday
			if ( this.ultraMonthViewSingle1.CalendarInfo.Holidays.Count == 0 )
				this.ultraMonthViewSingle1.CalendarInfo.Holidays.Add(yesterday, "My 2-day Holiday" );


			//	First let's determine which day has the most activity
			//	We do this by counting the occurrences of a given date
			//	in all the appointments' StartDateTime property, keeping
			//	track of the one with the most occurrences
			//	
			DateTime dateWithMostActivity = DateTime.Today;
			int count = 0, tempCount = 0;
			foreach( Appointment outer in this.ultraMonthViewSingle1.CalendarInfo.Appointments )
			{
				tempCount = 0;
				foreach( Appointment inner in this.ultraMonthViewSingle1.CalendarInfo.Appointments )
				{
					if ( inner.StartDateTime.Date == outer.StartDateTime.Date )
						tempCount++;
				}

				//	If this date has more appointments that all others before
				//	it, adjust the count and set the new dateWithMostActivity
				if ( tempCount > count )
				{
					count = tempCount;
					dateWithMostActivity = outer.StartDateTime;
				}
			}

			//	If there are no appointments, return without doing anything
			if ( count == 0 )
				return;

			//	Set the CalendarInfo object's FirstDayOfWeek property to the same day of the week
			//	as the day that has the most appointments
			this.ultraMonthViewSingle1.CalendarInfo.FirstDayOfWeek = (FirstDayOfWeek)( dateWithMostActivity.DayOfWeek );

			//	Set the Visible property of all DayOfWeek objects to false,
			//	except for the one that we want to see
			foreach( Infragistics.Win.UltraWinSchedule.DayOfWeek dow in this.ultraMonthViewSingle1.CalendarInfo.DaysOfWeek )
			{
				if ( (int)(dow.DayOfTheWeek) != (int)(dateWithMostActivity.DayOfWeek) )
					dow.Visible = false;
				else
					dow.Visible = true;
			}

			//	Set the VisibleWeeks property to 1, so we only display the day
			//	with the most activity
			this.ultraMonthViewSingle1.VisibleWeeks = 1;

			//	Set the CalendarInfo object's ActiveDay property to the same day as the
			//	date with the most activity
			this.ultraMonthViewSingle1.CalendarInfo.ActiveDay = this.ultraMonthViewSingle1.CalendarInfo.GetDay( dateWithMostActivity, true );

			//	Scroll the day into view to ensure that it is visible
			this.ultraMonthViewSingle1.ScrollDayIntoView( dateWithMostActivity, true );

			//	Since our task here is to optimize the control's display for Appointments,
			//	let's use the control's ActivityDisplayStyle property to suppress the displaying
			//	of other activities (Notes and Holidays).
			this.ultraMonthViewSingle1.ActivityDisplayStyle = ActivityDisplayStyleEnum.Appointments;

			//	Dirty and verify all UIElements to update the display
			this.ultraMonthViewSingle1.UIElement.DirtyChildElements();
			this.ultraMonthViewSingle1.UIElement.VerifyChildElements();

			//	Get the UIElement associated with the day that has the most
			//	activity. Then we can use its MoreActivityIndicatorVisible property
			//	to determine whether there are any remaining appointments that
			//	are not being displayed. If there are, we will set the
			//	DayOfWeekHeadersVisible property to false, which will give us a little
			//	more space in which to display the appointments.
			//
			//	Note that we can use the ActiveDay as the 'context' parameter to the
			//	GetDescendant method, since we set the ActiveDay a few lines above
			//	to the day with the most appointments
			DayUIElement dayUI = this.ultraMonthViewSingle1.UIElement.GetDescendant( typeof(DayUIElement), this.ultraMonthViewSingle1.CalendarInfo.ActiveDay ) as DayUIElement;
			if ( dayUI != null && dayUI.MoreActivityIndicatorVisible )
			{
				this.ultraMonthViewSingle1.DayOfWeekHeadersVisible = false;

				//   Since we are hiding the DayOfWeek headers, the name of the
				//   day of the week will not be displayed anywhere, so set the DayDisplayStyle
				//   property to Full so that it is displayed in the day header
				this.ultraMonthViewSingle1.DayDisplayStyle = DayDisplayStyleEnum.Full;

			}

		}
Requirements

Target Platforms: Windows 10, Windows 8.1, Windows 8, Windows 7, Windows Server 2012, Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also