Содержимое архива

:: Delphi - Модули

numeral.zip  (7012 байт)
Посмотреть содержимое

san-46 : 2007-10-16 16:36:14

Delphi - Модули

Опять зажеванная до непотребности функция "Сумма прописью", скажете.
Может быть, можеть быть, но что-то не встречал в море подобных функций таких, которые умеют согласовывать падежные окончания наименований единиц с числительными.
Предлагаемая функция это делать умеет. Поэтому преобразовать с ее помощью число во фразу:
"Расплатился ДВАДЦАТЬЮ ПЯТЬЮ рублями и ПЯТИДЕСЯТЬЮ ОДНОЙ копейкой" проще простого. Поддерживаются все современные падежи русского языка от именительного до предложного.
Наименования выводимых прописью единиц могут быть какими угодно.
Функция используется более десятка лет в коммерческих приложениях.
Последняя компиляция был выполнена на D7. Сторонних библиотек не требуется.
В исходнике есть подробный комментарий по ее использованию.

Скачать

Комментарии (0) 1813 скачиваний


Archive:  numeral.zip
  Length      Date    Time    Name
---------  ---------- -----   ----
    28675  2007-10-16 15:57   NumeralDate.pas
---------                     -------
    28675                     1 file