Ich habe mehrere RichTextBoxen und ein gemeinsames ContextMenuStrip mit Standardeinträgen wie Ausschneiden, Kopieren, Einfügen. Die MenuItems sind mit ShortCutKeys versehen.
Klicke ich mit der Maus auf ein MenuItem, so ist es kein Problem, die zugehörige RichTextBox zu ermitteln.
Beispiel:
Dim varToolStripMenuItem As ToolStripMenuItem = DirectCast(sender, ToolStripMenuItem)
Dim varContextMenuStrip As ContextMenuStrip = DirectCast(varToolStripMenuItem.Owner, ContextMenuStrip)
Dim varRichTextBox As RichTextBox = DirectCast(varContextMenuStrip.SourceControl, RichTextBox)
Wird nur aber der ShortCutKey, beispielsweise Strg+V für Einfügen, genommen, ist varRichTextBox = Nothing.
Frage: Wie kann ich die betreffende RichTextBox ermitteln, wenn ich ShortCutKeys benutze?
Vielen Dank für eine Lösungsansatz.
Klicke ich mit der Maus auf ein MenuItem, so ist es kein Problem, die zugehörige RichTextBox zu ermitteln.
Beispiel:
Dim varToolStripMenuItem As ToolStripMenuItem = DirectCast(sender, ToolStripMenuItem)
Dim varContextMenuStrip As ContextMenuStrip = DirectCast(varToolStripMenuItem.Owner, ContextMenuStrip)
Dim varRichTextBox As RichTextBox = DirectCast(varContextMenuStrip.SourceControl, RichTextBox)
Wird nur aber der ShortCutKey, beispielsweise Strg+V für Einfügen, genommen, ist varRichTextBox = Nothing.
Frage: Wie kann ich die betreffende RichTextBox ermitteln, wenn ich ShortCutKeys benutze?
Vielen Dank für eine Lösungsansatz.