CPF / CNPJ
19/02/2006
0
Obrigado
Brunoagbr
Posts
20/02/2006
Aroldo Zanela
Pelo comprimento da string:
No OnEnter:
begin TMaskEdit(Sender).EditMask := ´´; end;
No OnExit:
if TMaskEdit(Sender).GetTextLen = 11 then TMaskEdit(Sender).EditMask := ´000\.000\.000\-00;0;_´; if TMaskEdit(Sender).GetTextLen = 14 then TMaskEdit(Sender).EditMask := ´00\.000\.000\/0000\-00;0;_´;
20/02/2006
Brunoagbr
Valeu amigo
20/02/2006
Brunoagbr
Obrigado
04/03/2006
Edilcimar
Clique aqui para fazer login e interagir na Comunidade :)