REMOVER MENU DE TEXTBOX
o text box tem algum evento que chama o menu?se tiver tira o evento
sei la tenta isso!
sei la tenta isso!
MORLOCK, "gà ¼enta aÃ", que logo, logo te mando uma resposta definitiva, ok ??
E [txt-color=#0000ff]sim[/txt-color] existe um evento que chama o menu, AUGUSTTO, o clique do botão direito (não dá prá tirar o botão hehehe)...
TÃ ' cuidando desse assunto vlw, MORLOCK ???
Abraço, e T+
E [txt-color=#0000ff]sim[/txt-color] existe um evento que chama o menu, AUGUSTTO, o clique do botão direito (não dá prá tirar o botão hehehe)...
TÃ ' cuidando desse assunto vlw, MORLOCK ???
Abraço, e T+
Cara, até surgir uma alternativa precisa, encontrei um método pra vc...
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Text1.Enabled = False
End If
End Sub
o único problema é que desabilita o campo... aà vc se vira com um timer pra tentar resolver o problema... até aparecer algo realmente bom, usa isso.
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Text1.Enabled = False
End If
End Sub
o único problema é que desabilita o campo... aà vc se vira com um timer pra tentar resolver o problema... até aparecer algo realmente bom, usa isso.
MORLOCK, tenta fazer isto aqui ó...
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 93 Then PopupMenu mnu
' mnu é um menu qualquer sem Caption e com a propriedade Visible = False
End Sub
_________________________________________________________________________________
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then PopupMenu mnu
End Sub
__________________________________________________________________________________
Vc cria um outro menu e manda mostrar, tomando o lugar do original, ok ??? Só que esse que vc está mandando mostrar está InvisÃvel, portanto, não é para aparecer nada !!!
Vai fundo, tenta aÃ, vlw ???
Abraço...
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 93 Then PopupMenu mnu
' mnu é um menu qualquer sem Caption e com a propriedade Visible = False
End Sub
_________________________________________________________________________________
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then PopupMenu mnu
End Sub
__________________________________________________________________________________
Vc cria um outro menu e manda mostrar, tomando o lugar do original, ok ??? Só que esse que vc está mandando mostrar está InvisÃvel, portanto, não é para aparecer nada !!!
Vai fundo, tenta aÃ, vlw ???
Abraço...
MORLOCK, TEM MAIS ESTA AKI, Ó“...
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 93 Then Text1.Enabled = False
End Sub
____________________________________________________________________
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Text1.Enabled = False
End If
End Sub
______________________________________________________________________
Private Sub Timer1_Timer()
Timer1.Interval = 1000 ' configure de acordo com seu processador
Text1.Enabled = True
End Sub
__________________________________________________________________________
Tenta aÃ...
Abraço.
PS: Se resolveu, encerre o tópico
Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 93 Then Text1.Enabled = False
End Sub
____________________________________________________________________
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Button = 2 Then
Text1.Enabled = False
End If
End Sub
______________________________________________________________________
Private Sub Timer1_Timer()
Timer1.Interval = 1000 ' configure de acordo com seu processador
Text1.Enabled = True
End Sub
__________________________________________________________________________
Tenta aÃ...
Abraço.
PS: Se resolveu, encerre o tópico
Vlw MARCOSAV pela ajuda ae
essa ultima solucao funciona, mas eh uma "gambiarra" neh... vou usando essa ateh conseguir alguma coisa como uma API q desativa akele menu... e por enquanto eu vou agradecendo pela ajuda ae galera, vlw mesmo...
t+
essa ultima solucao funciona, mas eh uma "gambiarra" neh... vou usando essa ateh conseguir alguma coisa como uma API q desativa akele menu... e por enquanto eu vou agradecendo pela ajuda ae galera, vlw mesmo...
t+
Tópico encerrado , respostas não são mais permitidas