Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  
Подписаться на рассылку:
Клуб программистов


Основы Delphi
ThousandSeparator
Переменная
Символ, используемый для отображения разделителя тысяч SysUtils unit
  var ThousandSeparator : char;
Описание
ThousandSeparator переменная используется в валюте и с плавающей запятой отображать функции.

По умолчанию, значение ThousandSeparator равно ",", но оно зависит от вашего региона Windows.
Примечания
По умолчанию ThousandSeparator = LOCALE_STHOUSAND.
Похожие команды
CurrencyDecimals  Определяет число десятичных цифр в функции Format

CurrencyFormat  Определяет размещение строки валюты в функции показа валюты

CurrToStrF  Преобразует денежную величину в строку с форматированием

DecimalSeparator  Символ используемый для отображения десятичной точки

Format  Богатое форматирование чисел и текста в строке

NegCurrFormat  Определяет отображение отрицательного количества форматированной валюты

 
Пример кода : Изменение символа разделителя тысяч
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
 



© Блог программистов   |  Создание и продвижение сайтов - "Веб сателлит"  |  Ссылки  |     |  Английская версия