Calendar - Tooltip in day view

Print Page | Close Window

Tooltip in day view

Printed From: Codejock Forums
Category: Codejock Products
Forum Name: Calendar
Forum Description: Topics Related to Codejock Calendar
URL: http://forum.codejock.com/forum_posts.asp?TID=4538
Printed Date: 22 November 2024 at 8:03pm
Software Version: Web Wiz Forums 12.04 - http://www.webwizforums.com

Topic: Tooltip in day view

Posted By: WaaZ
Subject: Tooltip in day view
Date Posted: 04 July 2006 at 8:22pm

Since in day view there is now no way of knowing when an appointment time starts or ends except to either see how it fits into the time scale on the side or open the appointment, is there a way i can have tooltips working like you have them working in week and month view, so by moving my mouse over the appointment i can see when the start and end time and what the appointment contains etc.

I need this for day view, i know its already in week and month view. Again ideally it would be good to have this AND ALSO the ability to show start and end times for an appointment.

Im using 9.81 but if you told me this has been fixed in later realises then that would be great.

Thanks

Replies:

Posted By: sserge
Date Posted: 05 July 2006 at 2:55pm

Actually for such purposes you can disable standard calendar tooltips and
show your own one with some text.

See Custom Tooltips Example in calendar VB sample.

--
WBR,
Serge

Posted By: celebre
Date Posted: 08 October 2006 at 7:41pm

Is possible to use CalendarControl.TooltipText in VBA?

I tried the following but I get an error in Access'03 "Object don't admit that property".

CalendarControl1.TooltipText = ""

Greetings

Posted By: sserge
Date Posted: 09 October 2006 at 8:43am

ToolTipText property is provided by VB engine and it is not accessible in VBA. However, VBA does have its own ways to handle tooltips. For example, in Access you can use ControlTipText property.

--
WBR,
Serge

Posted By: celebre
Date Posted: 09 October 2006 at 9:59am

Yes but I can't modify the CalendarControl Tooltip behavior in VBA when user move cursor over an event, right?

I'm a little confused... can I access somehow the ToolTip property of CalendarControl in VBA?

In the above code, Form.ControlTipText isn't the same than CalendarControl1.ToolTipText

Private Sub CalendarControl1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Long, ByVal y As Long)
    Dim HitTest As CalendarHitTestInfo
    Set HitTest = CalendarControl1.ActiveView.HitTest

    Dim ctl As Control, i As Integer

    If (Not HitTest.ViewEvent Is Nothing) Then
        For Each ctl In Me.Controls
            With ctl
                If .ControlType = acTextBox Then
                    .ControlTipText = "[" & HitTest.ViewEvent.Event.ID & "] " & HitTest.ViewEvent.Event.Subject
               End If
            End With
        Next ctl
        Set ctl = Nothing
    Else
       ...
        ctl.ControlTipText = ""
       ...
    End If
End Sub

Thx for your fast answer.

Posted By: sserge
Date Posted: 09 October 2006 at 5:20pm

Well, why do you need this loop at all?

Simple modifying of your code in a following way works just fine for me showing a needed tooltip (tried it in Access):


Private Sub CalendarControl1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Long, ByVal y As Long)
    Dim HitTest As CalendarHitTestInfo
    Set HitTest = CalendarControl1.ActiveView.HitTest
    
    If (Not HitTest.ViewEvent Is Nothing) Then
        CalendarControl1.ControlTipText = "[" & HitTest.ViewEvent.Event.Id & "] " & HitTest.ViewEvent.Event.Subject
    Else
        CalendarControl1.ControlTipText = ""
    End If
End Sub

--
WBR,
Serge

Posted By: celebre
Date Posted: 09 October 2006 at 6:41pm

It worked perfectly. It's clear now.

Thx for your help.