Ampliando un poco la solución, yo uso una función para redondear a cualquier valor, sea entero o decimal
Código Delphi
[-]
function Redondeo(precio, aproximacion : extended) : extended;
begin
if aproximacion <> 0 then
precio := Round(precio / aproximacion) * aproximacion;
result := precio;
end;
En el parámetro Aproximacion, hay que pasarle la cantidad a la que se quiere aproximar, en tu caso sería 0.05.