Mascara textbox numérico

[rubens]

Olá...

Esto usando estas propriedades em um textbox

Código: Selecionar todos

     DEFINE TEXTBOX Text_9
            ROW    230
            COL    500
            WIDTH  120
            HEIGHT 24
            FONTNAME 'Arial'
            FONTSIZE 14
            TOOLTIP ""
            FONTBOLD .T.
            ONENTER Muda_Margem( This.Value )
            TABSTOP .T.
            VISIBLE .T.
            READONLY .F.
            RIGHTALIGN .F.
            BACKCOLOR {{255,255,255},{0,0,255},{128,255,255}}
            FONTCOLOR {0,0,255}
            INPUTMASK "99,999.99"
            FORMAT "E"
            NUMERIC  .T.
            VALUE NIL
     END TEXTBOX 

Daí quando entrar no textbox e digita 2 e dá enter ele não muda para 2,00 fica somente e não armazena nada.
Se digite 02 dígitos, pode ser 02 e dá enter ele atualiza para 2,00 e armazena o que foi digitado.
O que pode ser? o INPUTMASK está certo, não é?

Obrigado
Rubens

[MSDN]

Rubens,

Como vc usa MiniGUI Extended, consulte o exemplo da pasta Samples :
C:\MiniGUI\SAMPLES\BASIC\INPUTMASK

Abraço

[rubens]

Boa tarde Marcelo,

Também vi na pasta do inputmask e percebi o seguinte. No prg numeric.prg o último textbox o text_11.
Se você deixar ele sem valor, remover a segunda linha, a linha que tem o value “12345” e compilar vai ver que acontece o erro que percebi... se digitar somente 2 e pressionar enter, vai ficar só o 2 no textbox... para ficar 2,00 tem digitar pelo menos dois números, que pode ser 02 não tem problema...
Dessa forma o valor vai ter que sempre ser declarado.
Aí não funciona quando você busca por exemplo um campo do dbf que é 0.00. O textbox fica limpo, daí se o cliente digitar só um digito, vai dar o problema.
A forma que consegui fazer funcionar foi não colocar o E, mas aí a máscara ao invés de ficar 2,00 fica 2.00. Quase imperceptível, mas quando aquele cliente chato perceber e vai ser o primeiro a perceber eu vou ficar sem saída...
No primeiro Textbox que tem o símbolo do Euro funciona beleza, mesmo tirando o value... só que aparece o Euro.

O jeito vai ser deixar assim...

Obrigado
Rubens

[MSDN]

Rubens,

Utilize o GETBOX então :
C:\MiniGUI\SAMPLES\BASIC\GetBox

Abraço

[Daniel]

ola
e so colocar o VALUE 0.00 ou tanto de decimal que voce usa que vai funcionar

[rubens]

Bom Dia..

Daniel...
Acho que tem um pequeno bug na IDE. Quando defino value 0.00 e carrega o form o textbox é apresentado com uma / na formatação dele.. já no exemplo inputmask da minigui é exibido normal...

Erro TextBox.png (3.33 KiB) Exibido 861 vezes

Obrigado
Rubens