Mudar displayformat em tempo de execução ?

Delphi

15/04/2004

Olá pessoal acabei de me cadastrar no forum pois nao sei como fazer para definir em tempo de execução o formato #0.00 nas propriedades display format e Editformat em um campo da minha query.

Por favor se puderem me ajudar fico muito grata pois só falta isso para eu fechar uma tela do meu pequeno sistema.


Abraços,

:cry: [b:ff2e1aeffd][size=24:ff2e1aeffd][/size:ff2e1aeffd][/b:ff2e1aeffd]


Aleguerra

Aleguerra

Curtidas 1

Melhor post

Khundalini

Khundalini

15/04/2004

A propriedade DisplayFormat somente está disponível para objetos de classes descendentes da classe TNumericField. Você precisa, primeiro, saber se o campo que você vai tratar é um campo numérico (TFloatField, TBCDField, etc.). Depois, faça o seguinte:

with Query1 do
if FieldByName(´Campo´) is TNumericField then
TNumericField(FieldByName(´Campo´)).DisplayFormat := ´#,0.00´;

O peixe foi pescado!

[]s
Rubem Rocha
Manaus, AM


GOSTEI 1

Mais Respostas

Aleguerra

Aleguerra

15/04/2004

Olá, Rubem

muito obrigado pela sua dica, identifiquei o campo como do tipo ´TFloatField´ e implementei o codigo mais ao compilar ocorre o seguinte erro:

Undeclared identifier :´TFloatField´

Não sei se é por causa da vs. 5 que estou usando, será? Ou não tem nada haver ?

Por favor me dê uma luz...


Muito Obrigado,


GOSTEI 1
Khundalini

Khundalini

15/04/2004

Verifique se na seção implementation está declarada a unit DB.

[]s
Rubem Rocha
Manaus, AM


GOSTEI 1
Ednilson Santos

Ednilson Santos

15/04/2004

Opa, também precisei, muito grato!
GOSTEI 0
Ednilson Santos

Ednilson Santos

15/04/2004

Valeuuu, super útil!
GOSTEI 0
POSTAR