Функция 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 — символ, используемый для отображения разделителя тысяч.
Угостить автора чашечкой кофе