Hola Dexter182.
No, no digo que no sea correcta... pero por las dudas proba de este modo:
Código Delphi
[-]
...
uses Math;
...
StringGrid.Cells[3, i] := FloatToStr( RoundTo(DBGrid_Resultado.Fields[2].AsCurrency, -2) );
Y también recorda que es mejor usar la función
FieldByName que la propiedad vectorial
Fields, ya que si algún día cambias el órden de las columnas podrías tener problemas.
Saludos