Codejock Developer Community : Tooltip for Allday Event

Tooltip for Allday Event : Sure you not blind - this feature...

Thu, 07 May 2009 13:10:19 +0000

Author: mdoubson
Subject: 14102
Posted: 07 May 2009 at 1:10pm

Sure you not blind - this feature is coming in 13.1

Tooltip for Allday Event : But it seems that I'm blind....

Tue, 05 May 2009 09:08:45 +0000

Author: JDZA
Subject: 14102
Posted: 05 May 2009 at 9:08am

But it seems that I'm blind. I can't find this feature.

Ian

Tooltip for Allday Event : Now this feature supported on...

Sat, 02 May 2009 18:55:22 +0000

Author: mdoubson
Subject: 14102
Posted: 02 May 2009 at 6:55pm

Now this feature supported on Core level - without client code to use. You just need to set once e.g.

CalendarCtrl.CustomFormat4Tooltip = " My subject = @ in with "

and will replaced by specific value for event and fillers (like "My subject =" ) can be used to make all tooltip better looking (if you want it)

You can use tags in any order and also use one some of tags or one. This "CustomFormat4Tooltip" will overwrite other modes and show tooltip for each variable source of info (All Day, Multi Days and so on)

Tooltip for Allday Event : Hello JDZA, You can show tooltip...

Thu, 23 Apr 2009 03:07:36 +0000

Author: dentor
Subject: 14102
Posted: 23 April 2009 at 3:07am

Hello JDZA,

You can show tooltip for allday event.

Below a sample with different cases for tooltip:

* AllDay Event: tooltip show only Subject

* other Event: tooltip show StartTime-EndTime and Subject

* no Event: tooltip show StartTime

---------------------------------------------------------------------------

Private Sub CalendarControl_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim HitTest As CalendarHitTestInfo

    Set HitTest = CalendarControl.ActiveView.HitTest
    If Not HitTest.ViewEvent Is Nothing Then
        If HitTest.ViewEvent.Event.AllDayEvent Then
            CalendarControl.ToolTipText = HitTest.ViewEvent.Event.Subject
        Else
            CalendarControl.ToolTipText = JustTime(HitTest.ViewEvent.Event.StartTime) & "-" & JustTime(HitTest.ViewEvent.Event.EndTime) & " " & HitTest.ViewEvent.Event.Subject
        End If
    Else
        CalendarControl.ToolTipText = JustTime(HitTest.HitDateTime)
    End If
End Sub

Private Function JustTime(Dt As Date) As String
JustTime = Format(Dt, "hh:nn")
End Function

Tooltip for Allday Event : Hi, is there a way to enable...

Wed, 22 Apr 2009 06:56:42 +0000

Author: JDZA
Subject: 14102
Posted: 22 April 2009 at 6:56am

Hi,

is there a way to enable the tooltip, when the event is an alldayevent? I get only Tooltips for the non-alldayevents.

Greetings

Ian