Одним Format здесь похоже не обойдись. Можно соорудить маленькую функцию типа такой:
AmountTotalText := FORMAT(AmountTotal,10,'<Precision,1:><Integer><Decimals>');
AmountTotalText := DELCHR(AmountTotalText,'<',' ');
AmountTotalText := PADSTR(AmountTotalText,10,'0');
AmountTotal - Это Ваше число, которое нужно преобразовать