Справочник функций и процедур Delphi: ThousandSeparator

  Навигация по первой букве:

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

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

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

Delphi Sources

Описание
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
 


Последние добавленные на сайт исходники

DeLiKaTeS Tetris (Тетрис)

TDictionary Custom Sort

Fast Watermark Sources

3D Designer

Sik Screen Capture

Patch Maker

 

Айболит (remote control)

ListBox Drag & Drop

Доска для игры Реверси

Графические эффекты

Рисование по маске

Перетаскивание изображений

 

Copyright © 2004-2024 "Delphi Sources" by BrokenByte Software (источник – "DelphiBasics")

Группа ВКонтакте