Codejock Forums Homepage
Forum Home Forum Home > Codejock Products > ActiveX COM > Calendar
  New Posts New Posts RSS Feed - Calendar Tooltip Text Mystery
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

Calendar Tooltip Text Mystery

 Post Reply Post Reply
Author
Message
cannones View Drop Down
Groupie
Groupie
Avatar

Joined: 14 April 2010
Location: Australia
Status: Offline
Points: 16
Post Options Post Options   Thanks (0) Thanks(0)   Quote cannones Quote  Post ReplyReply Direct Link To This Post Topic: Calendar Tooltip Text Mystery
    Posted: 09 March 2011 at 5:10pm
Hi All,

I am trying to display a custom tooltip when the mouse hovers an event. I have the code working but in the codejock docs it mentions an undocumented property called TooltipText which is inherited ??

I also checked the generated package file and there is no sign of the property ..

Those that have the codejock calendar control help can see what I am referring to by looking up the method EnableToolTips.

 Any Ideas How I need to reference this ..

Sam
Back to Top
SuperMario View Drop Down
Admin Group
Admin Group
Avatar

Joined: 14 February 2004
Status: Offline
Points: 18057
Post Options Post Options   Thanks (0) Thanks(0)   Quote SuperMario Quote  Post ReplyReply Direct Link To This Post Posted: 25 March 2011 at 9:24am
Actually this refer to the CanlendarControl.ToolTipText property.  It is language specific too, in VB6 the Calendar inherits this property, in C# it will not.  ToolTipText is a standard control's property, provided by VB framework.

Use methods CalendarControl.EnableToolTips to disable built-in Calendar tooltips, then catch MouseMove and using method CalendarControl.ActiveView.HitTest determine the current active items where cursor is currently placed. Then show some custom tooltip with this information displayed.

This idea is show in Calendar Visual Basic sample. Please look below for an implementation of MouseMove method -- it is pretty simple:
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
    Debug.Print "MouseMove. HitTest = "; HitTest.ViewEvent.Event.Subject
   
    If ToolTips_Mode = 1 Then
      CalendarControl.ToolTipText = "[" & HitTest.ViewEvent.Event.Id & "] " & HitTest.ViewEvent.Event.Subject
    Else
      CalendarControl.ToolTipText = ""
      Me.Refresh
    End If
  Else
    CalendarControl.ToolTipText = ""
    Me.Refresh
  End If
End Sub
Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down

Forum Software by Web Wiz Forums® version 12.04
Copyright ©2001-2021 Web Wiz Ltd.

This page was generated in 0.141 seconds.