Нам необходимо сумму первести в формат строки из 18 символов без точки, т.е т.о.:
DoubleToStr(5831.91, '777777777777777788'),
результат данной операции будет
0000000000000583190 !??
Если в формате поставить точку - то все ок!
DoubleToStr(5831.91, '7777777777777777.88'),
результат данной операции будет
00000000000005831.91 !
С последней цифрой 9 - таже беда
