Codejock Developer Community : Making Sure Event is Visible

Codejock Developer Community : Making Sure Event is Visible http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 07:40:44 +0000 Fri, 14 Oct 2005 13:57:39 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=3021 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Making Sure Event is Visible : Hi, 1. First problem looks strange,...]]> http://forum.codejock.com/forum_posts.asp?TID=3021&PID=9046&title=making-sure-event-is-visible#9046 Author: sserge
Subject: 3021
Posted: 14 October 2005 at 1:57pm

Hi,

1. First problem looks strange, but see the next point...

2. Use one more quite useful method of calendar: RedrawControl.

   Some methods of calendar don't redraw control automatically to avoid "blinking" during adjusting.

3. Suggestion:
   If you don't need to save events - You do not need these lines of code, because calendar is created by default with memory data provider.

   May be .DataProvider.RemoveAllEvents is usefull - depending of your form using.

     ConnectionString = "Provider=XML;Data Source=" & App.Path & "\Events.xml"

        .SetDataProvider ConnectionString
        If Not .DataProvider.Open Then
               .DataProvider.Create
        End If
        .DataProvider.RemoveAllEvents 'We don't want previously saved events
        .DataProvider.Save

--
HTH,
Serge]]> Fri, 14 Oct 2005 13:57:39 +0000 http://forum.codejock.com/forum_posts.asp?TID=3021&PID=9046&title=making-sure-event-is-visible#9046 <![CDATA[Making Sure Event is Visible : We are setting up a Calendar control...]]> http://forum.codejock.com/forum_posts.asp?TID=3021&PID=9020&title=making-sure-event-is-visible#9020 Author: DDJJ
Subject: 3021
Posted: 12 October 2005 at 12:36pm

We are setting up a Calendar control to give our users the option of using the control to change the times for a specific event by dragging an event, or by using the mouse to drag the start or end times of an event. The code we've been trying is shown below.

Two problems. When our form opens up, the calendar control is frequently not visible. When I click on the area where the calendar control should be, it shows up, but not until then. ???

Second problem. We set up the event to be edited by the user in code (see below). This event could be at the beginning of a day or at the end, so we want the control to scroll forward to make sure the event is visible to the user. What we're doing is not working...any ideas why not?

ConnectionString = "Provider=XML;Data Source=" & App.Path & "\Events.xml"

    With CalendarControl1
        .SetDataProvider ConnectionString
        If Not .DataProvider.Open Then
           .DataProvider.Create
        End If
        .DataProvider.RemoveAllEvents 'We don't want previously saved events
        .DataProvider.Save
        .Options.FirstDayOfTheWeek = g_lFirstDayOfWeek
        .DayView.TimeScale = g_lTimeScale
        .Options.WorkDayStartTime = TimeValue(g_sStartTime)
        .Options.WorkDayEndTime = TimeValue(g_sEndTime)
    End With

    DatePicker1.MaxSelectionCount = 1
    DatePicker1.AttachToCalendar CalendarControl1

    CalendarControl1.ActiveView.ShowDay CDate(cbpStartDate.Text), True

    Set m_oEvent = CalendarControl1.DataProvider.CreateEvent

    m_oEvent.StartTime = cbpStartDate.Text & " " & cbpTimes(0).Text
    m_oEvent.EndTime = cbpStartDate.Text & " " & cbpTimes(1).Text

CalendarControl1.DataProvider.AddEvent m_oEvent

    CalendarControl1.Populate
    'CalendarControl1.DayView.ScrollToWo rkDayBegin 'We CAN get this line to      work
'We CAN'T get the following to work
'        Dim lCellNo As Long
''        lCellNo = CalendarControl1.DayView.GetCellNumber(CDate("10/9/2005 1:00:00 PM"))
''        CalendarControl1.ActiveView.EnableVScroll True
''        CalendarControl1.DayView.ScrollV lCellNo

]]> Wed, 12 Oct 2005 12:36:47 +0000 http://forum.codejock.com/forum_posts.asp?TID=3021&PID=9020&title=making-sure-event-is-visible#9020