Mascaras.....
Caros colegas, não estou conseguindo criar uma mascara de saida para R$ com o componente maskedit.......alguem poderia me dar uma força....
[]´s
Oscar Luiz
[]´s
Oscar Luiz
Oscarluiz
Curtidas 0
Respostas
Ezdala
15/04/2003
Eu não colocaria máscara na propriedade ´EditMask´ no evento onkeypress colocaria uma instrução para só aceitar nºs de 0 a 9 e ´,´
e no evento onexit formataria ex.:
OnKeyPress
If not (Key in [´0´..´9´,#8,´,´]) Then
Key := 0; {isso para só aceitar nº, o backspace, e a vírgula}
OnExit
MaskEdit1.Text := FormatFloat(´,0.00´,StrToFloat(MaskEdit1.Text));
Talves isso ajude ...
EZ
e no evento onexit formataria ex.:
OnKeyPress
If not (Key in [´0´..´9´,#8,´,´]) Then
Key := 0; {isso para só aceitar nº, o backspace, e a vírgula}
OnExit
MaskEdit1.Text := FormatFloat(´,0.00´,StrToFloat(MaskEdit1.Text));
Talves isso ajude ...
EZ
GOSTEI 0
Fernandocneto
15/04/2003
Caros colegas, não estou conseguindo criar uma mascara de saida para R$ com o componente maskedit.......alguem poderia me dar uma força....
[]´s
Oscar Luiz
utilize a propriedade editmask do proprio campo da tabela (objeto table).
GOSTEI 0