Fórum Inserir Mascaras diferentes no dbGrid Delphi #483522

24/06/2014

0

Tenho um aplicação que o campo CNPJ E CPF são salvo no mesmo local, daí eu quero que as exibir os dados no grid o CPF fique formatado com sua mascara e o mesmo com CNPJ. Se alguém poder me ajudar ficarei agradecido. Vlw até mais.
Antonio Junior

Antonio Junior

Responder

Post mais votado

25/06/2014

Olá Júnior!
Tenta fazer assim...
procedure cdsTabelaCPF_CNPJGetText(Sender: TField; var Text: string;
  DisplayText: Boolean);
begin
  if  Sender.AsString <> '' then
    begin
      if  Sender.DataSet.FieldByName('Tipo').AsString = 'F' then
          Text := FormatFloat( '0##"."###"."###"-"##', StrToFloatDef(Sender.AsString, 0) )
      else
          Text := FormatFloat( '0#"."###"."###"/"####"-"##', StrToFloatDef(Sender.AsString, 0) )
      ;
    end
  ;
end;

Encontrei este código em um post aqui no fórum, se não deu certo dá uma olhadinha no post [url]https://www.devmedia.com.br/forum/mudar-mascara-de-um-campo-em-tempo-de-execucao/15849[/url]
Espero q te ajude!

Marisiana Battistella

Marisiana Battistella
Responder

Gostei + 1

Mais Posts

25/06/2014

Antonio Junior

Marisiana Obrigado Perfeito como eu precisa.
Responder

Gostei + 0

25/06/2014

Marisiana Battistella

Por nada!! =)
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar