TextBox

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

welington
Usuário Nível 1
Usuário Nível 1
Mensagens: 15
Registrado em: 24 Ago 2019 15:21
Localização: são paulo

TextBox

Mensagem por welington »

Olá Boa tarde, Estou começando na área de programação e Gostei muito de trabalhar com Hmg-ide.
Bom, criei uma tela e coloquei o textbox como numérico e o inputMask para acrescentar pontuação "999.99". O problema é que Quando usa a tecla BackSpace para apaga os números, ele para na parte do ponto. a para continuar apagando o resto do numero é necessário usar as teclas direcionais.
Alguém conseguiu ajustar isso? Poderiam me ajudar ?
welington
Usuário Nível 1
Usuário Nível 1
Mensagens: 15
Registrado em: 24 Ago 2019 15:21
Localização: são paulo

TextBox

Mensagem por welington »

Achei a Reposta combinando algumas funções.

if tela_troco_entrega.Text_desconto.CaretPos = 4

if getkeystate(VK_BACK,.F.,.T.) < 0 .OR. getkeystate(VK_DOWN,.F.,.T.) < 0
tela_troco_entrega.Text_desconto.CaretPos := 3
Endif

endif
Responder