Question

我试图设计一个＆＃34;传递＆＃34;用于axShockwaveFlash控件。此控件没有与之关联的.MouseDown，.MouseUp或.MouseMove个事件。遗憾的是，我需要在任何冲击波控件上检测这些事件，因为它们在另一个类中使用（它在各种不同的控件上检测这些事件）。

所以，我尝试设计一个自定义类，修改axShockwaveFlash类以包含这些事件。但是，我收到以下错误：

＆＃34;派生类不能引发基类事件。＆＃34;

就行：

RaiseEvent MouseDown(Me, EventArgs.Empty)

完整代码（减去向上和移动功能）：

Imports System.Runtime.InteropServices
Imports System.Threading

Public Class MousedFlash

    Inherits AxShockwaveFlashObjects.AxShockwaveFlash

    'WndProc Inputs:
    Private Const WM_RBUTTONDOWN As Integer = &H204
    Private Const WM_LBUTTONDOWN As Integer = &H201

    Protected Overloads Sub OnMouseDown()
        RaiseEvent MouseDown(Me, EventArgs.Empty)
    End Sub

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        Select Case m.Msg
            Case WM_RBUTTONDOWN
                Debug.WriteLine("MOUSE FLASH - right down!")
                Call OnMouseDown()
                Return
            Case WM_LBUTTONDOWN
                Debug.WriteLine("MOUSE FLASH - left down!")
                Call OnMouseDown()
                Return
        End Select
        MyBase.WndProc(m)
    End Sub

End Class

我认为基类是AxShockwaveFlashObjects - 但我无法看到此处定义的鼠标事件。在这一点上我深入了解 - 任何帮助表示赞赏。

Answer 1

看看this page它看起来不是试图引发基类事件，而应该调用直接处理该事件的Sub。所以尝试替换

Protected Overloads Sub OnMouseDown()
    RaiseEvent MouseDown(Me, EventArgs.Empty)
End Sub

与

Protected Overloads Sub OnMouseDown()
    MyBase.MouseDown(Me, EventArgs.Empty)
End Sub

Answer 2

感谢。最后，我的粗心大意和错误的超越类型混合在一起。最终工作更换：

Shadows Event MouseDown As System.EventHandler
Protected Overridable Sub OnMouseDownTrigger()
    RaiseEvent MouseDown(Me, EventArgs.Empty)
End Sub

提升事件自定义控件类，它继承基类

2 个答案: