Сумма прописью
(COM-компонент)
COM-компонент для перевода чисел в словесное представление ("сумма прописью")
Производит конвертацию чисел и простых выражений в словесное представление. Обрабатываются числа длиной до 15 цифр (999 триллионов), словесное представление формируется для трёх валют (рубль, доллар, евро) на русском и английском языках.
УСТАНОВКА:
- компонент функционирует на компьютерах с Windows 2000/98 (на других версиях не испытывался)
- необходимо установить последнюю версию Windows Scripting Host (не ниже 5.5)
- файл InWordsIntl.wsc из архива поместите в любой каталог (который не будете в ближайшее время удалять) и зарегистрируйте в системе (при помощи команды "regsvr32 InWordsIntl.wsc" либо команды "Подключить" в контекстном меню проводника Windows).
СВОЙСТВА И МЕТОДЫ:
- ValutaId - Идентификатор валюты (можно задать "R" для рублей, "$" для долларов, "E" для евро).
- Language - Идентификатор языка словесного представления (можно задать "ru"/1049 для русского, "en"/1033 для английского).
- CheckExpression - Пытаться вычислить выражение в Source (логическое).
- CutOffZero - Не формировать представление нулевых значений копеек/центов.
- OddMoneyInWords - Мелочь (копейки/центы) словами (логическое).
- Source - Исходное значение (число или строка) для конвертации в словесное представление.
- Result - Результат конвертации (свойство по умолчанию).
- Convert(string) - Выполнить конвертацию строки string, вернуть результат конвертации.
- Execute() - Выполнить конвертацию значения из Source, результат поместить в Result.
- SetDefault() - Зафиксировать текущие значения параметров (ValutaId, Language, CheckExpression, CutOffZero, OddMoneyInWords) в качестве значений "по умолчанию"
- RubInWords(num) - Число в рубли.
- UsdInWords(num) - Число в доллары.
- EurInWords(num) - Число в евро.
ИСПОЛЬЗОВАНИЕ.
Свойства и методы компонента могут быть использованы в любой программе, способной выступать в качестве клиента OLE-автоматизации — VB, VC, WSH, компоненты MS Office, Delphi и др.
Примеры:
- Файл conv_test.vbs - примеры использования конвертера в WSH. Для запуска использовать команду
cscript.exe conv_test.vbs - Файл IVin&Word.vbs - пример использования в среде FarScriptHost. Подробности - в файле IVinWord.read.me.ru
- Файл conv_test.xls содержит функции (ToUSD, ToRUR, ToEUR), которые можно использовать для получения словесного представления на английском и русском языках чисел из ячеек таблицы. При открытии файла в MS Excel следует разрешить макросы.
Замечания:
- Во время первого использования конвертер устанавливает собственные параметры "по умолчанию" в соответствии с системными настройками. Для изменения умолчаний используйте метод SetDefault. Пример использования метода см. в файле conv_test.vbs.
- Перед использованием метода Convert свойству ValutaId можно присвоить значение "" (пустая строка) или "??". Метод в этом случае попытается выделить название денежной единицы в переданной строке string.
Возможности по модификации программы:
Программа написана на языке VBScript, поставляется в виде исходного кода. Для модификации программы требуется лишь простейший текстовый редактор, компилятор не нужен.
Вы можете вносить в код любые изменения (если получится что-нибудь полезное, сообщите).