Formatar um campo sem usar FieldsEditor

Delphi

31/08/2005

Galera, estou deixando de usar os campos declarados no FieldsEditor da Query, ou seja, estou usando direto [color=red:b735500d14]Query.FieldByName(´campo´.AsTipo[/color:b735500d14] invés de [color=blue:b735500d14]QueryCAMPO.AsTipo[/color:b735500d14] e etc....

Mas e a formatação dos campos de valores? Como eu faço?
Tentei o algoritipo abaixo só que não funcionou

procedure TfdmPrincipal.qryReceberAfterOpen(DataSet: TDataSet);
begin
  with fdmPrincipal, qryReceber do
  begin
    FieldbyName(´VALOR´).EditMask := ´#0,0.00´;
    FieldbyName(´VALOR_PAGO´).EditMask := ´0,0.00´;
    FieldbyName(´DATA_EMISSAO´).EditMask := ´DD/MM/YYYY´;
    FieldbyName(´DATA_VENCIMENTO´).EditMask := ´DD/MM/YYYY´;
    FieldbyName(´DATA_PAGAMENTO´).EditMask := ´DD/MM/YYYY´;
  end;
end;



Adriano Santos

Adriano Santos

Curtidas 0

Respostas

Adriano Santos

Adriano Santos

31/08/2005

sobe


GOSTEI 0
Rômulo Barros

Rômulo Barros

31/08/2005

Amigo, dei uma pesquisada no fórum por ´[b:42768d47d0]MaskEdit[/b:42768d47d0]´ e encontrei diversos tópicos sobre o assunto. Na maioria deles, o membro [b:42768d47d0]Lucas Alves e Silva[/b:42768d47d0] afirma sempre q o jeito correto é o jeito q vc está fazendo. Não sei o motivo pelo qual não tá funfando...

Mas, veja se [url=http://forum.clubedelphi.net/viewtopic.php?t=35617&highlight=editmask]ESTE LINK[/url] resolve seu problema.


GOSTEI 0
Adriano Santos

Adriano Santos

31/08/2005

[quote:c11c401083=´Rômulo Barros´]Amigo, dei uma pesquisada no fórum por ´[b:c11c401083]MaskEdit[/b:c11c401083]´ e encontrei diversos tópicos sobre o assunto. Na maioria deles, o membro [b:c11c401083]Lucas Alves e Silva[/b:c11c401083] afirma sempre q o jeito correto é o jeito q vc está fazendo. Não sei o motivo pelo qual não tá funfando...

Mas, veja se [url=http://forum.clubedelphi.net/viewtopic.php?t=35617&highlight=editmask]ESTE LINK[/url] resolve seu problema.[/quote:c11c401083]

Também sempre usei assim Rômulo, mas tô achando que é devido ao fato de usar MDO na aplicação...vou tentar de novo com componentes IBX, de qualquer forma vou dar uma olhda no link e tentar contornar.

valeu


GOSTEI 0
Adriano Santos

Adriano Santos

31/08/2005

[quote:66aaf4d4d0=´Rômulo Barros´]Amigo, dei uma pesquisada no fórum por ´[b:66aaf4d4d0]MaskEdit[/b:66aaf4d4d0]´ e encontrei diversos tópicos sobre o assunto. Na maioria deles, o membro [b:66aaf4d4d0]Lucas Alves e Silva[/b:66aaf4d4d0] afirma sempre q o jeito correto é o jeito q vc está fazendo. Não sei o motivo pelo qual não tá funfando...

Mas, veja se [url=http://forum.clubedelphi.net/viewtopic.php?t=35617&highlight=editmask]ESTE LINK[/url] resolve seu problema.[/quote:66aaf4d4d0]

Ae [b:66aaf4d4d0]Rômulo Barros[/b:66aaf4d4d0], com a dica do [b:66aaf4d4d0]sremulador[/b:66aaf4d4d0] no outro tópico deu certo e nem precisa formatar o EditMask. Valeu...ai em baixo a solução.

  with fdmPrincipal, qryPagar do
  begin
    TCurrencyField(FieldbyName(´VALOR´)).DisplayFormat:= ´#0,0.00´;
    TCurrencyField(FieldbyName(´VALOR_PAGO´)).DisplayFormat := ´0,0.00´;
    TDateTimeField(FieldbyName(´DATA_EMISSAO´)).DisplayFormat := ´DD/MM/YYYY´;
    TDateTimeField(FieldbyName(´DATA_VENCIMENTO´)).DisplayFormat := ´DD/MM/YYYY´;
    TDateTimeField(FieldbyName(´DATA_PAGAMENTO´)).DisplayFormat := ´DD/MM/YYYY´;
  end;



GOSTEI 0
Martins

Martins

31/08/2005

Poxa cara, muito bacana essa dica, ainda não deixei de utiliza [color=blue:4e0c159c33]QueryCAMPO.AsTipo [/color:4e0c159c33] pq não havia encontrado uma solução 100¬ funcional para utilizar [color=darkblue:4e0c159c33]Query.FieldByName(´campo´).AsTipo [/color:4e0c159c33], mas agora podemos ver isso, valew galera!!!


Martins


GOSTEI 0
Adriano Santos

Adriano Santos

31/08/2005

Poxa cara, muito bacana essa dica, ainda não deixei de utiliza [color=blue:e7baa40986]QueryCAMPO.AsTipo [/color:e7baa40986] pq não havia encontrado uma solução 100¬ funcional para utilizar [color=darkblue:e7baa40986]Query.FieldByName(´campo´).AsTipo [/color:e7baa40986], mas agora podemos ver isso, valew galera!!! Martins


Não uso mais a anos o esquema de FieldsEditor, mas confesso que tinha me esquecido completamente de fazer a formatação direto na classe do field, pois nas outras empresas que trabalhei eu nem mexia nos datamodules então acabei me acomodando um pouco.

:D


GOSTEI 0
Rômulo Barros

Rômulo Barros

31/08/2005

:arrow: [b:d59d2bd542]Relaxa !!![/b:d59d2bd542] :wink:


GOSTEI 0
POSTAR