Fórum To apanhando do mask edit #309073
13/01/2006
0
Joe_wah
Curtir tópico
+ 0Posts
13/01/2006
Njuniorba
Edit1.Text := FormatFloat(´0000´,StrToFloat(Edit1.Text));
os zeros vc diz quantos vc quer!
somente numero no edit, vai no onkeypress do mesmo e poe:
if not (key in [´0´..´9´,#8]) then abort;
onde escreve de 0 a 9 e aceita o backspace pra apagar uq estiver errado!
[]´s
Junior
Gostei + 0
14/01/2006
Edilcimar
Gostei + 0
14/01/2006
Bruno Belchior
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)