Bom Dia, pessoal...
Estou com um problema... Tenho um Dbedit q, dependendo do numero de caracteres, ele
formata para cpf ou cnpj. isso no evento OnExit do dbEdit, conforme a procedure:
procedure TFrmClientes.DBEdit13Exit(Sender: TObject);
begin
if length(dbedit13.Text) = 14 then
clientdataset1CGC.EditMask := '99\.999\.999\/9999\-99;0'
else
if length(dbedit13.Text) = 11 then
clientdataset1CGC.EditMask := '999\.999\.999\-99;0';
//CNPJ: 03.811.444/0002-15
//CPF: 045.007.199-54
end;
Mas se a pessoa digita um cpf, se arrepende, e quer voltar paa digitar um cnpj, naum
da! a máscara continua igual!!!
Então, no evento OnEnter do dbedit eu fiz:
procedure TFrmClientes.DBEdit13Enter(Sender: TObject);
begin
clientdataset1CEP.EditMask := emptystr;
//tb tentei clientdataset1CEP.EditMask := '';
end;
Mas a máscara continua...
Será q alguém sabe como posso "resetar" a máscara via código???
Obs.: o campo eh char, estou usando clientdataset + Ibx, Fb 1.5 e D7.
Obrigado!
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
