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.538 mal aufgerufen. |
TOP! Unser Nr. 1 Neu! sevDataGrid 3.0 Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Buchempfehlung Tipp des Monats Mai 2024 Hermann Röttger Wochentage eines Datumsbereichs ermitteln Wochentage eines Datumsbereichs ermitteln, optional mit Feiertagsberechnung TOP Entwickler-Paket TOP-Preis!! Mit der Developer CD erhalten Sie insgesamt 24 Entwickler- komponenten und Windows-DLLs. Die Einzelkomponenten haben einen Gesamtwert von 1605.50 EUR... |
||||||||||
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. |