Wie kommst du auf das Steuerelement geklickt wurde, öffnen Sie ein ContextMenuStrip?

Ich bin mit einem ContextMenuStrip für mehrere Steuerelemente, und ich versuche, herauszufinden, der beste Weg, um die Kontrolle, dass tatsächlich angeklickt um das Kontextmenü zu öffnen. Der sender gibt nur die ToolStripMenuItem Referenz, die einen Eigentümer hat die Eigenschaft, dass auf die ContextMenuStrip, aber ich kann nicht herausfinden, wie zu sagen, die Steuern, das klicken kam. Es muss ein einfacher Weg, um dies zu überprüfen, richtig? Ich überprüfe es in der ToolStripMenuItem's click-Ereignis.

Friend WithEvents mnuWebCopy As System.Windows.Forms.ToolStripMenuItem
...
Private Sub mnuWebCopy_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles mnuWebCopy.Click

Fand ich eine ähnliche post über diese, aber dass nennt mit einem SourceControl Eigenschaft, die ich nicht sehen hier.

Ich bin mit Visual Studio 2008, VB.Net winforms.

InformationsquelleAutor Shawn Steward | 2010-01-15
  1. 22
    Private Sub mnuWebCopy_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles mnuWebCopy.Click

Dim myItem As ToolStripMenuItem = CType(sender, ToolStripMenuItem)
Dim cms As ContextMenuStrip = CType(myItem.Owner, ContextMenuStrip)

MessageBox.Show(cms.SourceControl.Name)

End Sub
    • Danke, das war es, was mir fehlte.
    InformationsquelleAutor Tim Lentine
  2. 6

    Ihren Absender ein ToolStripMenuItem -- wirken.

    Der Besitzer ist ein ContextMenuStrip -- bekommen.

    SourceControl ist eine Eigenschaft, die auf das ContextMenuStrip und Referenzen der letzten Kontrolle aus, die der ContextMenuStrip angezeigt wurde.

    • Süß und auf den Punkt!
    InformationsquelleAutor Jay
  3. 0
    Private Sub kdgToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles kdgToolStripMenuItem.Click
    Dim sms = (sender.GetCurrentParent()).SourceControl.name
    MsgBox(sms)
End Sub

    '///Schneller

    InformationsquelleAutor KDG
  4. 0
    Private Sub cmsRightClick_Click(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles cmsRightClick.MouseClick
    Dim s As String = CType(sender, ContextMenuStrip).GetItemAt(CType(sender, ContextMenuStrip).DisplayRectangle.X, _
     CType(sender, ContextMenuStrip).DisplayRectangle.Y + e.Y).Text.Trim()


    MsgBox(s)
    Select Case s 
        Case Is = "Select Summary Total"
            Dim x = 0
        Case Is = "Select Collections"
            Dim x = 1
        Case Is = "UnSelect"
            Dim x = 2
        Case Is = "Reconcile"
            Dim x = 3
        Case Is = "Undo Reconciliation"
            Dim x = 4
    End Select
End Sub
    InformationsquelleAutor Philip Obiny
  5. -1

    Auf VB.NET 2013 diese Arbeit so in Ordnung ist:

    Dim cms As ContextMenuStrip = CType(sender, ContextMenuStrip)
MessageBox.Show(cms.SourceControl.Name)
    InformationsquelleAutor Mingut
Schreibe einen Kommentar