Codejock Developer Community : Tooltip in day view

Tooltip in day view : It worked perfectly. It's...

Mon, 09 Oct 2006 18:41:41 +0000

Author: celebre
Subject: 4538
Posted: 09 October 2006 at 6:41pm

It worked perfectly. It's clear now.

Thx for your help.

Tooltip in day view : Well, why do you need this loop...

Mon, 09 Oct 2006 17:20:45 +0000

Author: sserge
Subject: 4538
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

Tooltip in day view : Yes but I can't modify...

Mon, 09 Oct 2006 09:59:15 +0000

Author: celebre
Subject: 4538
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.

Tooltip in day view : ToolTipText property is provided...

Mon, 09 Oct 2006 08:43:43 +0000

Author: sserge
Subject: 4538
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

Tooltip in day view : Is possible to use CalendarControl.TooltipText...

Sun, 08 Oct 2006 19:41:42 +0000

Author: celebre
Subject: 4538
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

Tooltip in day view : Actually for such purposes you...

Wed, 05 Jul 2006 14:55:49 +0000

Author: sserge
Subject: 4538
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

Tooltip in day view : Since in day view there is now...

Tue, 04 Jul 2006 20:22:00 +0000

Author: WaaZ
Subject: 4538
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