Edit com 3 casa decimal
Ola
Tenho um problema com um edit q eu fiz q verifica se ja tem uma ´,´ virgua e nao deixa por outras.
Agora nao to conseguindo limitar 3 digitos apos a virgua
Tem que ficar assim 0,226 e nao deixar digitar +
mas ta ssim 0,25569898 isso nao quero ja pesquisei no forum algo mas nao achei.
Agredeço qq ajuda
Tenho um problema com um edit q eu fiz q verifica se ja tem uma ´,´ virgua e nao deixa por outras.
Agora nao to conseguindo limitar 3 digitos apos a virgua
Tem que ficar assim 0,226 e nao deixar digitar +
mas ta ssim 0,25569898 isso nao quero ja pesquisei no forum algo mas nao achei.
Agredeço qq ajuda
Dart
Curtidas 0
Respostas
Onjahyr
27/02/2008
Vc pode usar o componente TMaskEdit do Delphi e criar a sua máscara....
ou pode usar no evento onChange do TEdit a verificação usando um [b:31d9d7dc1c]Format[/b:31d9d7dc1c], ele tem os patrâmetros para usar com as Strings, procure aqui no fórum por [b:31d9d7dc1c]Format[/b:31d9d7dc1c]...
Blz.
ou pode usar no evento onChange do TEdit a verificação usando um [b:31d9d7dc1c]Format[/b:31d9d7dc1c], ele tem os patrâmetros para usar com as Strings, procure aqui no fórum por [b:31d9d7dc1c]Format[/b:31d9d7dc1c]...
Blz.
GOSTEI 0
Dart
27/02/2008
nao eh bem assim q preciso
tem q ficar livre pq com mask nao da uma aparencia legal
e com format nao sei como fazer, ja pesquisei
se souber de uma forma e puder passar pra mim fico grato
eu preciso desse edit para um PDV e so falta isso hehe mas se nao achar um jeito vai ficar sem verificar msm.
tem q ficar livre pq com mask nao da uma aparencia legal
e com format nao sei como fazer, ja pesquisei
se souber de uma forma e puder passar pra mim fico grato
eu preciso desse edit para um PDV e so falta isso hehe mas se nao achar um jeito vai ficar sem verificar msm.
GOSTEI 0
Arc
27/02/2008
no evento onexit ....
edit1.text := formatfloat(´#,0.000´,StrToFloat(StringReplace(edit1.text, ´.´, ´´, [rfReplaceAll])));
edit1.text := formatfloat(´#,0.000´,StrToFloat(StringReplace(edit1.text, ´.´, ´´, [rfReplaceAll])));
GOSTEI 0