主题：[求助]窗口菜单的提示不出来

在窗口菜单里设置了菜单项的提示，但鼠标放上去提示不显示，请问是什么原因？

测试没有问题，上例子看看

确实出不来提示，请老师看看

只有下级菜单才能出来提示，上面的出不来

 

是的，目前就是这种情况。

 ItemMouseEnter 事件

 

If e.StripItem.ParentItem Is Nothing Then
    Dim lbl As WinForm.Label
    If e.form.Controls.contains("test") = False Then
        lbl = e.Form.CreateControl("test", ControlTypeEnum.Label)
        lbl.visible = False
        lbl.width = 0
        e.Form.AddControl(lbl)
    Else
        lbl = e.Form.controls("test")
    End If
    Dim point As Point = e.StripItem.BaseControl.Bounds.Location
    lbl.left = point.x
    lbl.Top = point.y
    lbl.ShowToolTip(e.StripItem.ToolTip)
End If

 

 ItemMouveLeave事件

 

If e.StripItem.ParentItem Is Nothing Then
    Dim lbl As WinForm.Label = e.Form.controls("test")
    lbl.HideToolTip()
End If