DELETE A DIREITA

MIGUELSA3 27/07/2009 10:36:03
#317958
a tecla delete não apaga à direita, como ponho pra funcionar normalmente no programa
TECLA 27/07/2009 10:54:05
#317963
Porque não usa a tecla BACKSPACE?
MIGUELSA3 27/07/2009 11:23:12
#317964
sim, mas eu quero que a tecla delete também funcione. qual o código?
TECLA 27/07/2009 12:12:51
#317971
Tente este POG com uma TEXTBOX com a propriedade Name igual a Text1:

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then KeyCode = 0
End Sub


Private Sub Text1_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then
KeyCode = 0
If Len(Text1) = 0 Then Exit Sub
Text1.SelStart = Len(Text1)
Text1 = Left(Text1, Len(Text1) - 1)
Text1.SelStart = Len(Text1)
End If
End Sub


Teste e retorne o resultado aqui.
MIGUELSA3 27/07/2009 13:01:32
#317976
assim funciona como backspace
X16X 27/07/2009 14:05:28
#317992
voce quer que ao invez do DELETE apagar tudo que esta em sua direita , ele apaga tudo que esteja a sua esquerda ?

Explica melhor como quer que funcione.
TECLA 28/07/2009 09:00:17
#318079
Citação:

MIGUELSA3 escreveu:
assim funciona como backspace



  • Deixe claro no tópico
  • [Ô]o que é o problema[Ô] e [Ô]o que deseja fazer[Ô] para resolvê-lo.
  • Poste exemplos mais compreensíveis ao apresentar sua(s) dúvida(s).
  • Utilize este espaço da melhor forma possível, para que outros usuários que possuem (ou possuirem) a mesma dúvida que você, possa re-aproveitar este tópico.
  • A rotina postada tem como objetivo utilizar a tecla DELETE como BACKSPACE.

    Se não resolveu, explique o motivo para que outros colegas possam ajudá-lo.
  • MIGUELSA3 29/07/2009 07:42:37
    #318210
    a tecla backspace apaga caracteres à esquerda e a delete apaga os caracteres à direita, só que a tecla delete não o está a fazer. Como se põe a tecla delete a funcionar normalmente?
    RICART 29/07/2009 08:25:02
    #318212
    Resposta escolhida
    Só posso entende que pode estar ocorrendo um dos problemas:

    1-Seu controle está configurado para RightToLeft, fazendo com que o del funcione como backspace e este como del;
    2-Há algum evento no seu código que está anulando o funcionamento desta tecla; ou
    3-Seu teclado está com problema ou não está configurado adequadamente.

    Se o seu problema for o 1o. caso, vc precisará fazer a interceptação do keydown ou keypress e enviar o keycod (SendKeys) do backspace quando for pressionado o del e vice-versa.



    Tópico encerrado , respostas não são mais permitidas