menuitems is not working when clicking on shockwave

[mark103]

Hi guys,

I have a form with contextmenu where you can get the menu items on shockwave. I uses the menu items event to get the method of working when clicking them on shockwave by using right-mouse button. When I debug the project and when I clicked on testmenu item, nothing have happens.



Form Code:

Public Class Form1

    Private Sub testmenu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles testmenu.Click
        MessageBox.Show("this is the test!")
    End Sub
End Class

Class Library:


Code:

Public Class ShockwaveMenu
    Inherits AxShockwaveFlashObjects.AxShockwaveFlash
    Private Const WM_RBUTTONDOWN As Integer = &H204

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        Select Case m.Msg
            Case WM_RBUTTONDOWN
                Form1.ContextMenu1.Show(Me, PointToClient(Cursor.Position))
                m.Result = New IntPtr(1)
                Return
        End Select
        MyBase.WndProc(m)
    End Sub
End Class

Please can you tell me why it doesn't do anything when I click on testmenu item?? And please can you help me to get this fix by when I click the point on shockwave to get the contextmenu items then click them to get the menuitems fully in working order??




Thanks,
Mark