Inserir Mascaras diferentes no dbGrid Delphi

Delphi

24/06/2014

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

Curtidas 0

Melhor post

Marisiana Battistella

Marisiana Battistella

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!
GOSTEI 1

Mais Respostas

Antonio Junior

Antonio Junior

24/06/2014

Marisiana Obrigado Perfeito como eu precisa.
GOSTEI 0
Marisiana Battistella

Marisiana Battistella

24/06/2014

Por nada!! =)
GOSTEI 0
POSTAR