Fórum Valor Monetário no Dbgrid #364959

:?:
Olá a todos.
Uso Delphi + DbExpress
Como apresentar campo monetário com ,00 no Dbgrid.
Abaixo o código que monto os campos do Dbgrid

procedure MontaGridPedidos;
begin

With FrM1010.GridPedidos do
begin
Columns.Clear;

Coluna := Columns.Add;
Coluna.Title.Caption := ´Lancto´;
Coluna.FieldName := ´Ped_Cod´;
Coluna.Width := 60;

Coluna := Columns.Add;
Coluna.Title.Caption := ´Dt.Pedido´;
Coluna.FieldName := ´Ped_DtPedido´;
Coluna.Width := 80;

Coluna := Columns.Add;
Coluna.Title.Caption := ´Razão Social´;
Coluna.FieldName := ´Cli_RazaoSocial´;
Coluna.Width := 290;

Coluna := Columns.Add;
Coluna.Title.Caption := ´Valor Total´;
Coluna.FieldName := ´Ped_Valor´;
Coluna.Width := 75;
end;

TFloatField(d.CdsPed.FieldByName´Ped_Valor´)).DisplayFormat := ´,#0.00´;

end;


Mas não apresenta os valore monetários com duas decimais.

Abraços
Neto