Aqui está: minha intenção é exibir valor no formato ex.: 500,00 no DbGrid 
...
procedure TFrmOrcamento.AtualizaItens;
begin
Estado := 'A';
with DmConsulta.CDS_ItemOrcam do
    begin
    Close;
    CommandText:= 'select IO_COD, IO_NUM_ORCAM, PRODUTOS.P_COD, P_COD_BARRAS, '+
                   'P_DESCRICAO, P_UNIDADE, IO_QUANTIDADE, IO_VL_UNIT, '+
                   'IO_VL_UNIT*IO_QUANTIDADE IO_VL_TOTAL from ITENS_ORCAM, 
PRODUTOS';
    CommandText := CommandText + ' where IO_NUM_ORCAM = ' +IntToStr(NumOrcam);
    CommandText := CommandText + ' and ITENS_ORCAM.p_COD = PRODUTOS.p_COD';
    CommandText := CommandText + ' order by 4';
    Open;

(* já tentei de varias formas *) // veja como fica o grid: 
http://www.inforamos.com/dbgrid_formato_valor.JPG

//TFloatField(Fields[8]).DisplayFormat:= '###,###.00';
//TFloatField(Fields[9]).DisplayFormat:= '###,###.00';
//TNumericField(DmConsulta.CDS_ItemOrcam.FieldByName('IO_VL_UNIT')).DisplayFormat:=
 '#,##0.00';
//TNumericField(DmConsulta.CDS_ItemOrcam.FieldByName('IO_VL_TOTAL')).DisplayFormat:=
 ',0.00';
  //  DmConsulta.CDS_ItemOrcam.FieldByName('IO_VL_UNIT').DisplayFormat:= 
'##,###,##0.00';
  //  
TNumericField(DmConsulta.CDS_ItemOrcam.FieldByName('IO_VL_UNIT')).DisplayFormat:=
 '##,###,##0.00';
//   (FieldByName('IO_VL_UNIT') as TNumericField).DisplayFormat:= '#,##0.00';
 // (FieldByName('IO_VL_TOTAL') as TNumericField).DisplayFormat:= 
'##,###,##0.00';
  end;
end;


www.inforamos.com
  ----- Original Message ----- 
  From: BandaLemuel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Thursday, March 29, 2007 7:47 AM
  Subject: Re: [delphi-br] DisplayText do DBGrid


  posta o codigo para eu dar uma olhada....
  Wesley


  ----- Original Message ----- 
  From: [EMAIL PROTECTED] 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, March 28, 2007 12:12 PM
  Subject: Re: [delphi-br] DisplayText do DBGrid

  fiz assim: TFloatField(Fields[8]).DisplayFormat:= '###,###.00'; conforme vc 
mensionou mais ainda continua no DBGrid 500 ao inves de 500,00

  erivando

  www.inforamos.com
  ----- Original Message ----- 
  From: BandaLemuel 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Wednesday, March 28, 2007 7:54 AM
  Subject: Re: [delphi-br] DisplayText do DBGrid

  Tente assim... 

  no evento que executa o SQL.. logo apos ter aberto o seu componente query....

  TFloatField(Query.Fields.Fields[n]).DisplayFormat := '###,###.00';

  Espero ter ajudado

  Wesley

  ----- Original Message ----- 
  From: inforamos 
  To: delphi-br@yahoogrupos.com.br 
  Sent: Tuesday, March 27, 2007 12:18 PM
  Subject: [delphi-br] DisplayText do DBGrid

  boa tarde!

  tenho um dbgrid com um campo valor que alimentado por uma consulta 
  realizada por um clientdataset.

  o valor é apresentado assim: 100000 eu goataria que formatasse assim: 
  1.000,00

  acho que eu poderia usar o DisplayText mas não estar dando certo, 
  aguem da lista poderia mim ajudar....?

  grato!

  [As partes desta mensagem que não continham texto foram removidas]

  [As partes desta mensagem que não continham texto foram removidas]

  ----------------------------------------------------------

  No virus found in this incoming message.
  Checked by AVG Free Edition.
  Version: 7.5.446 / Virus Database: 268.18.20/736 - Release Date: 27/3/2007 
16:38

  [As partes desta mensagem que não continham texto foram removidas]



   

[As partes desta mensagem que não continham texto foram removidas]

Responder a