title image


Smiley Re: Bei Klick mit rechter Maustaste soll eine Menüliste kommen (VB6)
versuch es mal hiermit:







      

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

' Du legst im Menüeditor folgendes Menü an:



' Caption | Name

' Datei | mnuDatei

' ..... Öffnen | mnuÖffnen

' ..... Schließen | mnuSchließen



' wenn das Popup Menü nirgends oben in der Leiste erscheinen soll,

' dann musste noch bei Datei visible=False setzen



' Diesen Code einfach für ein Objekt bzw Form in die Prozedur MouseDown einfügen

If Button = 2 Then

    Form1.PopupMenu mnuDatei

End If



' Fertig !!!

End Sub 









Gruß

Daniel
-----
Gegen unnötige Signaturwerbung :D



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: