como tomo en cuenta los decimales cuando son ceros.......

[LizVazquez]

hola,
Me podrian apoyar debido a que la siguiente funcion:

cCtvs:= Format('%4.2n',[rCentavos]);
cCtvs := Copy(cCtvs,3,2);
sLetras := '( ' + sLetras + 'PESOS ' + Copy(Format('%4.2n',[rCentavos]),3,2) + ' /100 CTVOS )';

ya que no me toma en cuenta cuando los centavos son 00, cuando son 01 al 99 los toma sin problemas pero en 00 no, me podrian apoyar gracias............