Функція CurrToStrF в Delphi перетворює грошову величину в рядок з форматуванням.
SysUtils unit
- function CurrToStrF ( Value : Currency; Format : TFloatFormat; Digits : Integer ) : string;
- function CurrToStrF ( Value : Currency; Format : TFloatFormat; Digits : Integer; const FormatSettings : TFormatSettings ) : string;
Функція CurrToStrF конвертує грошову величину в рядок з можливістю управління форматуванням через Format. Користувачеві надається можливість визначити, скільки цифр буде відображено.
Параметри Format визначені TFloatFormat (юніт SysUtils):
- ffCurrency : $2,345.60
- ffExponent : 2.3456E+04
- ffFixed : 2345.60
- ffGeneral : 2345.6
- ffNumber : 2,345.6
Версія 2 цієї функції – для використання у межах потоків. Заповнюйте запис FormatSettings перед викликом запиту. Вона отримує локальну копію глобальної форматуючої змінної, яка робить вашу підпрограму потокобезпечною.
Примітка.
Ви можете змінити грошовий рядок із вбудованого (наприклад, '$' в США), використовуючи змінну CurrencyString.
Ви можете змінити позицію валютного рядка, використовуючи змінну CurrencyFormat.
Ви можете змінити знак десяткового дробу величини, встановлюючи символ DecimalSeparator.
Ви можете змінити значення роздільника тисяч, встановивши символ ThousandSeparator.
Змінна NegCurrFormat визначає форматування негативних сум.
Функція CurrToStrF: Відображення значень валюти як фінансових значень
var
amount1 : Currency;
begin
amount1 := 1234.567;
// Відображення у форматі Currency
CurrencyString := 'Ј ';
ShowMessage('Використовуючи 4 цифри = '+CurrToStrF(amount1, ffCurrency, 4));
ShowMessage('Використовуючи 2 цифри = '+CurrToStrF(amount1, ffCurrency, 2));
ShowMessage('Використовуючи 0 цифр = '+CurrToStrF(amount1, ffCurrency, 0));
end;Результат
Використовуючи 4 цифри = $ 1,234.5670
Використовуючи 2 цифри = $ 1,234.57
Використовуючи 0 цифр = $ 1,235
Подібні функції, процедури та команди
CurrencyDecimals — визначає число десяткових цифр у функції Format.
CurrencyFormat — визначає розміщення рядка валюти у функції показу валюти.
CurrencyString — рядок валюти, що використовується у функціях відображення валюти.
DecimalSeparator — символ, який використовується для відображення десяткової крапки.
FloatToStrF — перетворює значення з плаваючою комою в рядок з форматуванням.
NegCurrFormat — визначає відображення негативної кількості форматованої валюти.
TFloatFormat — формати, що використовуються у функціях відображення чисел з плаваючою комою.
ThousandSeparator — символ, який використовується для відображення роздільника тисяч.
Пригостити автора кавою