Disalibilare il menù contestuale di un textbox

[cubeccu]

Ciao a tutti,
sapete come si fa a disabilitare ilmenù contestuale di un textbox (quello con taglia, copia, incolla, ecc...) in visual basic?!? Vorrei proprio che quando viene cliccato col pulsante destro un textbox questo non venga visualizzato ma invece siano fatte altre operazioni.

Ciao a presto.

[GudFella]

Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
... ALTRE OPERAZIONI ....
End If
End Sub

[cubeccu]

...si ma così viene visalizzato lo stesso il menù a tendina...

[xegallo]

il problema è complesso
per evitarlo secondo me bisogna ricorrere al subclassing
se hai pazienza domani ti posto la soluzione

se invece vuoi solo sostituire il contextmenu con un tuo menu personalizzato è facilissimo

[xegallo]

Option Explicit

Const WM_CONTEXTMENU = &H7B

Dim WithEvents TextBoxHook As MsgHook

Private Sub Form_Load()
   
    Set TextBoxHook = New MsgHook
     ' subclass Text1
    TextBoxHook.StartSubclass Text1.hWnd
End Sub

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
   TextBoxHook.StopSubclass
   Set TextBoxHook = Nothing
End Sub

Private Sub TextBoxHook_BeforeMessage(hWnd As Long, uMsg As Long, _
   wParam As Long, lParam As Long, retValue As Long, Cancel As Boolean)
   If uMsg = WM_CONTEXTMENU Then
      Cancel = True
   End If
End Sub

necessita della dll msgHook se non ce l'hai mail me xegallo@html.it

[ale500]

Originariamente inviato da xegallo
se invece vuoi solo sostituire il contextmenu con un tuo menu personalizzato è facilissimo

e per sostituirlo conn un menu personalizzato come devo fare...

come devo fare a non far vedere il menu in alto ma solo quando faccio dasto dx sopra....grazies