Fórum Inserir Mascaras diferentes no dbGrid Delphi #483522
24/06/2014
0
Antonio Junior
Curtir tópico
+ 0Post mais votado
25/06/2014
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
Gostei + 1
Mais Posts
25/06/2014
Antonio Junior
Gostei + 0
25/06/2014
Marisiana Battistella
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)