Delphi-Help

Описание

Переменная CurrencyFormat, в действительности, перечислимый тип. Значения, которые она может содержать, определяют размещение строки валюты в функциях отображения валюты, типа CurrToStr.
Разрешенные значения:
0 = Перед числом
1 = После числа
2 = Перед числом с пробелом
3 = После числа с пробелом

Пример кода

var
amount : Currency;
i      : Byte;
begin
amount := 12;    // 12 долларов
// Отображение количества, используя все 4 формата валюты
for i := 0 to 3 do
begin
CurrencyFormat := i;
ShowMessage('Format '+IntToStr(i)+' = '+CurrToStrF(amount, ffCurrency, 0));
end;
end;

Format 0 = $12
Format 1 = 12$
Format 2 = $ 12
Format 3 = 12 $

Примечание

Переменная CurrencyString определяет фактическое обозначение денежного символа или строки. В США, значение по умолчанию - $
По умолчанию CurrencyFormat = LOCALE_ICURRENCY.