SMMoneyStr component

SMMoneyStr component offers an opportunity of reception from numeric value to its verbal string.
The opportunity of the task of currency (US dollars, DM, euros, british pounds, UAH, ukrainian karbovanets and Russian roubles, South Africa Rands, Dominican Republic peso, Rupiah), language of translation (English, German, Russian, Ukrainian, Spanish, Indonesian) and types of number translation in a string is realized.
You can define:
- property Currency - currency for translation (tcUAH, tcKarbovanec, tcUSD, tcRUR, tcDM, tcPound, tcEuro)
- property Language - language for translation (tlUkrainian, tlRussian, tlEnglish, tlGerman, tlSpain)
- property Expand - types for translation
exWholeSum: expand of the whole part of the number value (fourty five or 45)
exWholeCurrency: expand of the currency for whole part (rubles or rub)
exFractionSum: expand of the fractional part of the number value (ten or 10)
- exFractionCurrency: expand of the currency for fractional part (centes or cnt)
- property CharCase:
ccLower: all characters in a target string is a small
ccProper: first character is a capital, all rest is a small
ccUpper: all characters in a target string is a capital
The opportunity of use not component, and usual call of function (without registration components), returning verbal string also:
function GetMoneyStr(Value: Double; Expand: TExpand; Language: TLanguage; Currency: TCurrency; CharCase: TCharCase): string;