Redondear a n decimales

[Vivi]

nBuen dia ,
Les agradezco mucho por la ayuda que puedan brindarme. Tengo un problema con mi funcion de redondeo a n decimales.
tengo esta operacion 2300-2270=30
y cuando aplico la funcion para redondear el resultado de la resta me da:
Round_nDec(2300-2270)=29.99

La funcion es la siguiente:

Código Delphi [-]
 function TFGeneral.Round_nDec( const Valor : Double; const NumDec : Smallint ): Double;
 begin
   Result:= MyRound( Valor * IntPower(10, NumDec)) / IntPower(10, NumDec);
 end;

Por favor ¿Puedes ayudarme con funciones para redondeo a n decimales?
necesito usar la funcion para numeros decimales y enteros.