Есть ли функция для записи числа строчкой?

[Nick]

325 = триста двадцать пять
?

[Nick]

Поспешил с вопросом, нашел сам: DoubleToStr

[oiko]

Насколько помню в форме платежек используется GroupWrapStr(). Поконкретней пожалуйста.

[Goblin]

DoubleToStr(325,'4') = 'Триста двадцать пять' ...

Вопросы ?

[JackVn]

Форматный перевод вещественных чисел в строку предназначен для вывода текстового представления числа и в основном используется для вывода результатов, связанных с деньгами. Ниже дано описание формата для этой функции:

3 Выводить знак числа (плюс или минус).

4 Текстовое представление целой части.

5 Текстовое представление дробной части.

6 Необязательная (незначимая) цифра целой части.

7 Обязательная (значимая) цифра целой части.

8 Обязательная (значимая) цифра дробной части.

9 Необязательная (незначимая) цифра дробной части.

Управляющие символы вводятся после обратного слеша "\" и заключаются в кавычки:

E Ввод разрядности \<число>E

S Символ заполнения \S<символ>

P Точность окруления \<знак округления><число>P

M Мужской род \m (например: "Два рубля")

F Женский род \f (например: "Две копейки")

Остальные символы исходной строки копируются в результирующую строку в соответствующем порядке.


Пример


...

.var

i: double;

s: string;

.endvar

...

.begin

i := 12345.6789;

s := doubletostr(i, '377777.8888');

end.

...


Результат:


+12345.6789

....................

I::= 123.456

S::= DoubleToStr (I, 34.5);

.....................