ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Máscara !!!

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
Lippi
Membro Junior
Membro Junior


Registrado: Terça-Feira, 25 de Novembro de 2008
Mensagens: 378

MensagemEnviada: Qua Jul 23, 2014 7:43 pm    Assunto: Máscara !!! Responder com Citação

Senhores do Delphi, boa noite.

(D7; Fb 2,5)

Senhores, elaborei um rotina para gerar contratos de prestação de serviços, no Word .

Deu tudo certo. Entretanto, quando a variável trata-se do CPF (por exemplo) é "capturado" o número sem os pontos e sinais - tipo: 12345678900 - gostaria que gerasse com a formatação padrão, ou seja, 123.456.789-00.

Busco esse dado em um MaskEdit, que tem máscara, assim:
Código:
Word.Selection.Find.Text := '@xcpf';
Word.Selection.Find.Replacement.Text := MaskEd_CPFrespcnpj.Text;
Word.Selection.Find.Execute(Replace := 2);


Há alguma forma de "buscar' no maskedit com a respectiva máscara?

Desde já, obrigado.
_________________
Longo e difícil é o caminho que, das trevas, nos leva à luz.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail MSN Messenger
wjuniordias
Profissional
Profissional


Registrado: Sexta-Feira, 16 de Março de 2012
Mensagens: 667

MensagemEnviada: Qui Jul 24, 2014 9:30 am    Assunto: Re: Máscara !!! Responder com Citação

Como está a máscara na propriedade "EditMask"?
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário MSN Messenger
natanbh1
Colaborador
Colaborador


Registrado: Terça-Feira, 15 de Março de 2011
Mensagens: 3093
Localização: Belo Horizonte - MG

MensagemEnviada: Qui Jul 24, 2014 9:50 am    Assunto: Responder com Citação

A mascara no MaskEdit tem uma opção Save Literal Character.

Se marcar essa opção ele salva os caracteres e coloca "1" após o ";" da máscara. Se não marcar ele coloca "0".

Código:

// aqui ele não salva a mascara
999.999.999-99;0;_

// aqui ele salva a mascara
999.999.999-99;1;_

_________________
''A persistência é o caminho para o êxito.''
Charlie Chaplin
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail
wjuniordias
Profissional
Profissional


Registrado: Sexta-Feira, 16 de Março de 2012
Mensagens: 667

MensagemEnviada: Qui Jul 24, 2014 9:54 am    Assunto: Responder com Citação

O natanbh1 disse algo que eu iria dizer também, provavelmente na sua máscara deve estar "0", sendo assim, ele não lê a máscara, apenas o valor. Altere para "1" que ele vai puxar a máscara também.
_________________
"O sábio nunca diz tudo o que pensa, mas pensa sempre tudo o que diz." (Aristóteles)
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Visitar a homepage do Usuário MSN Messenger
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> Delphi Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB