Delphi-Help

Описание

var ThousandSeparator : char;

ThousandSeparator переменная используется в валюте и с плавающей запятой отображать функции.

По умолчанию, значение ThousandSeparator равно ",", но оно зависит от вашего региона Windows.

Пример кода

var
amount : Currency;
begin
amount := 1234567.89;    // 1,234,567 фунтов 89 пенсов

// Показ с заданными по умолчанию разделителем тысяч
ShowMessage('Amount = '+FloatToStrF(amount, ffCurrency, 10, 2));

// Показ с новым разделителем тысяч
ThousandSeparator := ' ';
ShowMessage('Amount = '+FloatToStrF(amount, ffCurrency, 10, 2));
end;

Amount = $1,234,567.89
Amount = $1 234 567.89

Примечание

По умолчанию ThousandSeparator = LOCALE_STHOUSAND.