
how can I disable the delay time in custom tooltip
I have downloaded several custom tooltips but however I want to
disable the delay time so that when the cursor is in the control the
tooltip will not disappear if the cursor is still in the control.
Here are some of the code that I think need to modify:
Public Property Get DelayTime(dwType As ttDelayTimeConstants) As Long
If (m_hwndTT = 0) Then Exit Property
DelayTime = SendMessage(m_hwndTT, TTM_GETDELAYTIME, (dwType And
ttDelayMask), 0&)
End Property
Public Property Let DelayTime(dwType As ttDelayTimeConstants,
dwMilliSecs As Long)
If (m_hwndTT = 0) Then Exit Property
Call SendMessage(m_hwndTT, TTM_SETDELAYTIME, (dwType And
ttDelayMask), ByVal dwMilliSecs) ' no rtn val
End Property
In other code here is I think that needs to modify:
Public Property Let VisibleTime(ByVal vData As Long)
mvarVisibleTime = vData
SendMessageLong hTT, TTM_SETDELAYTIME, TTDT_AUTOPOP, vData
End Property
Please help me on how to do this.