5,39790000 aparece R$ 5,4 no delphi???

Olá!!
Olha seu problema acho que pode ter duas soluções... uma veja nas configurações do sistema se os valores pra moeda estão aparecendo com 2 zeros...
mas se ainda assim persistir você pode colocar o seguinte código na hora de trazer o campo no evento OnGetText do campo da query que vc está usando

Text:= FormatFloat(´#,0.00´,Sender.asString);

Espero ter ajudado.. qualquer coisa é só falar []´s :wink:

e quando este problema é num dbgrid usando ado, o que devo fazer?

va na propriedade FIELDS da tabela da grid,
selecione o campo do ´valor´, e na propriedade DISPLAYFORMAT coloque #,0.00 se for moeda ,coloque na propriedade currency = true; :idea:

mas como eu faria isso em tempo de execução?, pois minha as colunas da minha tabela eu gero usando um SELECT, do sql

NUNCA TENTEI ASSIM, QUEM SABE:

SELECT CAST(VALOR AS NUMERIC(18,2)) AS VALOR

FROM PRODUTO

se vc adicionou uma query ...

adiciono na query os fields (field editor,newfield) com os nomes e as propriedades do meu select :

select custo from produtos

é só adicionar um field do tipo IBBCD na query com nome custo e verifique as propriedades:

fieldname = custo
size= 4 (no meu caso eu uso numeric 12,4)
currency = true; (ou diplayformat)

O négocio lá do OnGetText deu certo, mas ele não fica como moeda.
Como colocar como moeda??? Ou ainda se possível não existe uma outra solução??? Pois são centenas de campos e vai dar um imenso trabalhar usar isso.