Преобразование числа в прописной текст

← →
TheEd (2005-11-29 05:49) [0]

помогите по сабжу!

нарп. IntToStrWords(523) = "пятьсот двадцать три"

← →
Slider007 © (2005-11-29 06:24) [1]

Попробуй сам написать, для меня это была очень хорошая тренировка мозгов в своё время.

← →
Amoeba © (2005-11-29 10:13) [2]

Найдешь здесь (несколько статей по данному вопросу + готовые модули):
http://www.delphikingdom.com/asp/allarticles.asp

← →
Васяня (2005-11-29 10:15) [3]

Ну пипец... дожили, скоро буду спрашивать как написать калькулятор... паскаль, первый курс...

← →
TheEd (2005-11-30 18:08) [4]

> Попробуй сам написать, для меня это была очень хорошая тренировка
> мозгов в своё время.

написать могу, мозги для этого уже 10 лет тренирую, и сделаю это профессионально, но это будет изобретение велосипеда, ЭТО наверняка делали сотни людей, и почему бы не воспользоваться их результатами. Мне просто нужно было вставить быстро, дело было в 5 утра, хотелось спать. Вот и попросил мастеров.

> Найдешь здесь (несколько статей по данному вопросу + готовые
> модули):
> http://www.delphikingdom.com/asp/allarticles.asp

за ссылку спасибо!

> Ну пипец... дожили, скоро буду спрашивать как написать калькулятор.
> .. паскаль, первый курс...

см. цитату to Slider007, читай внимательно. И если некуда применить интеллект кроме как на ничего не стоящие высказывания, то лучше их не делать. Без обид.

← →
Andy BitOff © (2005-11-30 20:00) [5]

Вот класный модуль по теме: http://am.rusimport.ru/MSAccess/topic.aspx?ID=98

Цитата:

"это просто оболочка для функций.
"lVal - валюта. поддерживаются:
"1 -рубли
"2 - доллары
"3 - марки
"4 - фунты
"5 - условные единицы
"6 - целых (просто числа)
"lUseDecimal -выводить ли дробную часть
"0 - не выводить
"1- выводить числом
"2- выводить прописью

"am 010507
"для простых чисел можно применять род -
"то есть если передаешь одновременно Валюту 6,lUseDecimal=0 и какой род - то
"в случае целого числа не будет выведено слово "целая" и число будет в указанном роде
"Например
"? Num2Str(1,6,0)=одна целая
"? Num2Str(1,6,0,"c")=одно

http://kladovka.net.ru/index.cgi?pid=list&rid=266
http://kladovka.net.ru/index.cgi?pid=list&rid=228

ЗЫ. Не знаю, сам не пробовал ни один из них.

← →
TheEd (2005-12-02 06:56) [7]

> Andy BitOff © (30.11.05 20:00) [5]
>
> Вот класный модуль по теме: http://am.rusimport.ru/MSAccess/topic.
> aspx?ID=98

и

> kami © (30.11.05 20:06) [6]
>
> http://kladovka.net.ru/index.cgi?pid=list&rid=266
> http://kladovka.net.ru/index.cgi?pid=list&rid=228

спасибо.!

Преобразование числа в прописной текст Найти похожие ветки