[[BlueSteel]]

me respondo..

con esto es suficiente

Código Delphi [-]
 
vTot_Fin.AsCurrency := Round(vTot_Fin.AsCurrency);