Controlar o número de casas decimas

[João Paulo Taraciuk 0]

Olá pessoal, eu estou utizando este código para imprimir números com casas decimais no QReport,

procedure Tfrm_orcamento.QRDBText5Print(sender: TObject;
  var Value: String);
var valor:Double;
begin
valor:=StrToFloat(Value);
Value:=FloatToStrF(valor,ffFixed,5,3);
end;

Aí imprime três casas decimais, os valores estão entrando no banco com 3 casas, mas o que eu quero é o seguinte, digamos que eu tenho o valor 45,123, aí tranquilo, pode imprimir com 3 casas mas, se está o valor 45,120 ou 45,000 no banco, gostaria que imprimisse 45,12 ou 45,00 no QReport.

 

Se alguém puder me dar uma dica, eu agradeço!!

[Marcelo R Moura 0]

no lugar de

 

Value:=FloatToStrF(valor,ffFixed,5,3);

você coloca

 

Value:=FormatFloat('###,###,##0.00',valor