Галактика в вопросах и ответах

Код: Выделить всё

What’s New 102.26899

Добавил функцию для печати числа прописью:

FloatToWords(Sum: double; RubStr, KopStr: string; KopWord, FirstUp: boolean): string;

Sum     - Число
*RubStr  - Строка с наименованием валюты
          по умолчанию "рубль;рубля;рублей"
*KopStr  - Строка с наименованием сотых валюты
          по умолчанию "копейка;копейки;копеек"
KopWord - Копейки числом или прописью (True - прописью)
FirstUp - Первая буква в верхнем регистре (True - в верхнем регистре)

•	Для того чтобы выводились значения поучолчанию, нужно передавать пустую строку.

Доработки: ПИР 102.72360 и 102.76471
Добавлено два необязательных параметра HideKop и Gender

FloatToWords(Sum: double; RubStr, KopStr: string; KopWord, FirstUp: boolean; HideKop: boolean = False; Gender: word = gndMF): string',

HideKop - прятать копейки (по умолчанию False - копейки выводятся).  Параметр задает нужно ли выводить копейки.
Gender.
  Параметр задает в каком роде (мужском, женском, среднем) выдавать результат.
  Параметр влияет как на целую часть (рубли), так и на дробную (копейки).
В скриптах FastReport дополнительно стали доступны девять констант.
От слов:
Male gender   - мужской род
Female gender - женский род
Neuter gender - средний род
Соответственно:
  gndMM - рубли в мужском роде, копейки в мужском роде
  gndMF - рубли в мужском роде, копейки в женском роде
  gndFM - рубли в женском роде, копейки в мужском роде
  gndFF - рубли в женском роде, копейки в женском роде
  gndMN - рубли в мужском роде, копейки в среднем роде
  gndNM - рубли в среднем роде, копейки в мужском роде
  gndFN - рубли в женском роде, копейки в среднем роде
  gndNF - рубли в среднем роде, копейки в женском роде
  gndNN - рубли в среднем роде, копейки в среднем роде

По умолчанию значение gndMF - рубли в мужском роде, копейки в женском роде

Код: Выделить всё

FloatToWords(kotp, 'целых', 'десятых', false, false)

Код: Выделить всё

handler with replace Test_BeforeEnterModule on ExtensionPoint epBeforeEnterModule
                     (aContour: String; aModule: String)
Action
{
  RegisterGlobalIfc('C_ExtClass::iExtAttrClassInfo')
}

Код: Выделить всё

[CompileVipExpression('sGetAttr(coDogovor, ' + IntToStr(<DOCS."CDOGOVOR">) + ', 
''Наименование внешнего атрибута'')')]