AxVLCPlugin2始终显示工具栏VB.net

Question

我正在使用AxVLCPlugin2。默认情况下，工具栏会自动隐藏。我希望它留下来。如果有的话，找不到合适的命令。我正在使用VB.net谢谢

Answer 1

您注意到在控件上挥动鼠标时工具栏如何保持打开状态？你可以模拟它。将计时器放到表单上，将其设置为，假设默认为100毫秒间隔并启用它。然后将以下代码放入Timer_Tick事件处理程序：

Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
    Dim curPos = Cursor.Position

    Cursor.Hide()
    Cursor.Position = New Point(Me.Left + MyAxVLCPlugin21.Left + 100 * Rnd(1), Me.Top + MyAxVLCPlugin21.Top + 100 * Rnd(1))

    Application.DoEvents()

    Cursor.Position = curPos
    Cursor.Show()

End Sub

这样做，每100ms隐藏鼠标光标，将其移动到VLC控件上的随机位置，然后返回并取消隐藏它。这种情况在用户没有注意到的情况下发生，但它可以实现 - 控制接收鼠标移动和工具栏停留。