Wie erstellt man ein PopUp-Menü? Der Anwender soll die Möglichkeit haben, bei Klick auf die rechte Maustaste aus einem Menü etwas auswählen zu können. Ein PopUp-Menü wird über den Menü-Editor erstellt. Starten Sie ein neuesProjekt und geben Sie im Menü-Editor folgendes ein: Caption:MyPopUp
Name:mnuMyPopUp
Dieses Menü bekommt jetzt noch zwei Untermenüs: Für das erste Untermenü mit der Pfeiltaste einmal nach rechts einrücken ... Caption:Löschen Name:mnuDelete ... das zweite Untermenü auf der gleichen Ebene erstellen: Caption:Beenden Name:mnuExit Damit dieses Menü beim Start der Form nicht angezeigt wird, entfernen wirentweder noch das Häkchen in der Checkbox vor Visible oder lösen das Ganze perCode im Form_Load Ereignis: Private Sub Form_Load() mnuMyPopUp.Visible = False End Sub Der Aufruf erfolgt dann im MouseDown-Ereignis des jeweiligen Elements: ' Beispiel Form Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub ' Beispiel ListBox Private Sub List1_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub ' Beispiel PictureBox Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, _ X As Single, Y As Single) If Button = 2 Then ' rechte Maustaste Me.PopupMenu mnuMyPopUp End If End Sub Dies funktioniert bei allen Steuerelementen, die ein MouseDown-Ereignis habenund bei denen von Haus aus kein PopUp-Menü vorhanden ist. Diese Seite wurde bereits 24.530 mal aufgerufen. |
sevISDN 1.0 Überwachung aller eingehender Anrufe! Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung Neu! sevEingabe 3.0 Einfach stark! Ein einziges Eingabe-Control für alle benötigten Eingabetypen und -formate, inkl. Kalender-, Taschenrechner und Floskelfunktion, mehrspaltige ComboBox mit DB-Anbindung, ImageComboBox u.v.m. |
||||||||||
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein. |