CNPJ - Tratameno de ERRO!!

Delphi

16/12/2003

Olá...

Fiz uma mascara pra o CNPJ mas qdo o usuário digita, por exemplo:

[b:739f87f095]49.___.___/____-__[/b:739f87f095]

dai aparece o erro : ´ ´ is nota valid integer value

:arrow: Como faço um tratamento pra esse erro ??


Educdc

Educdc

Curtidas 0

Respostas

Vanius

Vanius

16/12/2003

No evento OnKeyPress vc pode colocar algo assim:

if Key = ´ ´ then
Key := #0;

neste caso, quando se digitar ´ ´ o sistema ignora e é como vc nao tivesse digitado nada.

vc pode ampliar isto, ex.:

if Key in [´ ´, ´\´, ´*´] then
Key := 0;

Ok?

espero ter ajudado,

Abraços,

Vanius Girodo
vaniusg@yahoo.com.br


GOSTEI 0
Educdc

Educdc

16/12/2003

Assim n da certo, pq qdo colocamos mascaras o edit ja recebe
´__.___.___/____-__´ , entao não tem como ficar ´ ´ !!!

:arrow: Alguem pode mim ajudar???


GOSTEI 0
Programador_junior

Programador_junior

16/12/2003

como vc colocou a mascara ?
!00.000.000\0000-00;0;?

muda pra !99.999.999\9999-99;0;


GOSTEI 0
Educdc

Educdc

16/12/2003

Onde esta o arquivo q eu altero as mascaras do Delphi???


GOSTEI 0
Educdc

Educdc

16/12/2003

como vc colocou a mascara ? !00.000.000\0000-00;0;? muda pra !99.999.999\9999-99;0;


N eh assim n???

Alguem ai pode mim ajudar ainda??

Abraços!!


GOSTEI 0
Educdc

Educdc

16/12/2003

Para ser mais claro???

Como q crio uma mascara CNPJ ??


GOSTEI 0
Lenin

Lenin

16/12/2003

Colega,

Na propriedade EditMask do edit cnpj, clique em ´...´ e no campo ´Input Mask´ coloque ´99.999.999/9999-99´. Sempre fiz assim e nunca deu erro.
Outra coisa: Porque vc não armazena o cnpj como String em vez de Integer ? Garanto a você que não dá erro.

Abraços;


GOSTEI 0
POSTAR