[firebase-br] mudar mascara em tempo de execução

[Pha-Lista]

Voce pode utilizar o evento OnGetText do Field ou criar um campo calculado.

Exemplo:

procedure TFrmLivRegSai.cdsPrincCD_CFOPGetText(Sender: TField;
  var Text: String; DisplayText: Boolean);
begin
  inherited;
  if DisplayText then
    Text := FormatMaskText('9.99.9;0; ', Sender.AsString)
  else Text := Sender.AsString;
end;

PHA
Nova Odessa / SP - Brazil

-----Mensagem original-----
From: Visão On-Line - Jones Kleber visao em visao-ol.com.br
Date: Fri,  4 Feb 2005 15:30:19 -0300
To: lista em firebase.com.br
Subject: [firebase-br] mudar mascara em tempo de
	=?iso-8859-1?q?execu=E7=E3o?=

> Olá grupo,
> 
> Estou precisando resolver o problema abaixo, se alguem puder me ajudar.
> 
> A situação é a seguinte:
> - Tenho o campo atual definido como numeric(11,3) no banco, agora, para 
> os valores com fração zerada preciso apresentar o conteúdo sem as 
> decimais, isso a nivel de grid.
> 
> - Como eu faço para mudar a mascara em tempo de execução.
> 
>     tb_estoquegrade.FieldsDisplayFormat.Clear;
>     if frac(tb_estoquegrade.fieldbyname('atual').ascurrency)<=0 then
>        tb_estoquegrade.FieldsDisplayFormat.Add('ATUAL=######0.000')
>     else
>        tb_estoquegrade.FieldsDisplayFormat.Add('ATUAL=##########0')
>     ;
> 
> Estou utilizando o IBO+D7
> 
> Boa tarde,
> 
> -- 
> Atenciosamente,
> 
> Jones Kleber M. dos Santos
> 
> (24) 9968-7136
> 
> E-mail: jones em visao-ol.com.br
> 
>   MSN: jones_visao em hotmail.com
> 
> Skype: visaoonline
> 
>  
> 
> Visão On-Line Assessoria e Informática Ltda.
> 
> Tel:(24) 2252-3017 / 2255-3712
> 
> *e-mail**:* visao em visao-ol.com.br <mailto:visao em visao-ol.com.br> *Home 
> Page**:* www.visao-ol.com.br <http://www.visao-ol.com.br/>
> 
>  
> 
>  
> 
>  
> 
>  
> 
>  
> 
> 
> 
> 
> ---
> avast! Antivirus: Outbound message clean.
> Virus Database (VPS): 0505-1, 02/02/2005
> Tested on: 4/2/2005 16:30:19
> avast! - copyright (c) 1988-2004 ALWIL Software.
> http://www.avast.com
> 
> 
>