Gd convert.GetNumeral - История изменений

SYSDBA в 11:13, 27 июля 2016

2016-07-27T11:13:12Z

SYSDBA в 16:18, 3 июля 2016

2016-07-03T16:18:09Z

SYSDBA в 16:16, 3 июля 2016

2016-07-03T16:16:48Z

SYSDBA в 13:56, 3 июля 2016

2016-07-03T13:56:28Z

SYSDBA в 23:36, 2 июля 2016

2016-07-02T23:36:56Z

SYSDBA в 23:33, 2 июля 2016

2016-07-02T23:33:00Z

SYSDBA в 23:07, 2 июля 2016

2016-07-02T23:07:55Z

SYSDBA: Новая страница: «{{FuncDef|unit={{#explode:{{PAGENAME}}|.|0}}|type=function|src=function GetNumeral(const AFormat: String; AValue: Double; const ARounding: Double; const AFracBa…»

2016-07-02T22:57:24Z

Новая страница: «{{FuncDef|unit={{#explode:{{PAGENAME}}|.|0}}|type=function|src=function GetNumeral(const AFormat: String; AValue: Double; const ARounding: Double; const AFracBa…»

Новая страница

{{FuncDef|unit={{#explode:{{PAGENAME}}|.|0}}|type=function|src=function GetNumeral(const AFormat: String; AValue: Double; const ARounding: Double;
const AFracBase: Integer; const ACase: Integer; const AParts: Integer; const ANames: String): String;}}
<onlyinclude>Конвертирует число в строку.</onlyinclude>

@@ Строка 29: / Строка 29: @@
 ;ARounding:Округление. 0 -- без округления. 1 -- до целого числа. 10 -- до десятков. 100 -- до сотен, 0.01 -- до сотых, 5 -- число будет кратно 5, 0.5 -- число кратно 0.5 и т.д.
 ;AFracBase:Количество десятичных позиций, которые составляют дробную единицу. Например, при преобразовании в строку тонны-килограммы, когда величина задается в тоннах, AFracBase = 3.
-;ACase:Регистр результирующей строки. '''caseName = 0''' -- Первая буква заглавная, остальные строчные; '''caseLower = 1''', '''caseUpper = 2''' -- в нижнем и верхнем регистре, соответственно; '''caseMixed = 3''' -- не изменять регистр. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
+;ACase:Регистр результирующей строки. Целочисленное значение. '''caseName = 0''' -- Первая буква заглавная, остальные строчные; '''caseLower = 1''', '''caseUpper = 2''' -- в нижнем и верхнем регистре, соответственно; '''caseMixed = 3''' -- не изменять регистр. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
 ;AParts:Битовая маска может включать следующие значения: '''partSubstWhenZero = 1''' -- если значение ноль, то подставлять переданную строку, '''partHideFracWhenZero = 2''' -- не выводить дробную часть, если она равна нулю, '''partHideWholeWhenZero = 4''' -- не выводить целую часть если она равна нулю.
 ;ANames:наименования, через запятую, в следующем порядке:

@@ Строка 29: / Строка 29: @@
 ;ARounding:Округление. 0 -- без округления. 1 -- до целого числа. 10 -- до десятков. 100 -- до сотен, 0.01 -- до сотых, 5 -- число будет кратно 5, 0.5 -- число кратно 0.5 и т.д.
 ;AFracBase:Количество десятичных позиций, которые составляют дробную единицу. Например, при преобразовании в строку тонны-килограммы, когда величина задается в тоннах, AFracBase = 3.
-;ACase:Регистр результирующей строки. caseName = 0 -- Первая буква заглавная, остальные строчные; caseLower = 1, caseUpper = 2 -- в нижнем и верхнем регистре, соответственно; caseMixed = 3 -- не изменять регистр. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
+;ACase:Регистр результирующей строки. '''caseName = 0''' -- Первая буква заглавная, остальные строчные; '''caseLower = 1''', '''caseUpper = 2''' -- в нижнем и верхнем регистре, соответственно; '''caseMixed = 3''' -- не изменять регистр. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
-;AParts:Битовая маска может включать следующие значения: partSubstWhenZero = 1 -- если значение ноль, то подставлять переданную строку, partHideFracWhenZero = 2 -- не выводить дробную часть, если она равна нулю, partHideWholeWhenZero = 4 -- не выводить целую часть если она равна нулю.
+;AParts:Битовая маска может включать следующие значения: '''partSubstWhenZero = 1''' -- если значение ноль, то подставлять переданную строку, '''partHideFracWhenZero = 2''' -- не выводить дробную часть, если она равна нулю, '''partHideWholeWhenZero = 4''' -- не выводить целую часть если она равна нулю.
 ;ANames:наименования, через запятую, в следующем порядке:

@@ Строка 23: / Строка 23: @@
    @I         -- ISO валюты
    @O         -- код валюты
 ;AValue:Значение для преобразования
@@ Строка 93: / Строка 95: @@
 |-
 |GetNumeral('@W @F @D000.#### @K', 5687.3694, 0, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') || Пять тысяч шестьсот восемьдесят семь тонн 369.4 кг
 |}

@@ Строка 27: / Строка 27: @@
 ;ARounding:Округление. 0 -- без округления. 1 -- до целого числа. 10 -- до десятков. 100 -- до сотен, 0.01 -- до сотых, 5 -- число будет кратно 5, 0.5 -- число кратно 0.5 и т.д.
 ;AFracBase:Количество десятичных позиций, которые составляют дробную единицу. Например, при преобразовании в строку тонны-килограммы, когда величина задается в тоннах, AFracBase = 3.
-;ACase:Регистр результирующей строки. caseName = 0 -- Первая буква заглавная, остальные строчные. caseLower = 1, caseUpper = 2 -- в нижнем и верхнем регистре соответственно. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
+;ACase:Регистр результирующей строки. caseName = 0 -- Первая буква заглавная, остальные строчные; caseLower = 1, caseUpper = 2 -- в нижнем и верхнем регистре, соответственно; caseMixed = 3 -- не изменять регистр. Знак валюты и код валюты не преобразовываются, а выводятся в строку так как задано при вызове функции.
 ;AParts:Битовая маска может включать следующие значения: partSubstWhenZero = 1 -- если значение ноль, то подставлять переданную строку, partHideFracWhenZero = 2 -- не выводить дробную часть, если она равна нулю, partHideWholeWhenZero = 4 -- не выводить целую часть если она равна нулю.
 ;ANames:наименования, через запятую, в следующем порядке:

@@ Строка 4: / Строка 4: @@
 ;AFormat:Строка формата может содержать следующие метапеременные:
    @N         -- числительное для всего числа
@@ Строка 32: / Строка 31: @@
 ;ANames:наименования, через запятую, в следующем порядке:
-      Целая единица, именительный падеж, единственное число. Например, тонна
+# Целая единица, именительный падеж, единственное число. Например, тонна
-      Целая единица, родительный падеж, единственное число. Например, тонны
+# Целая единица, родительный падеж, единственное число. Например, тонны
-      Целая единица, родительный падеж, множественное число. Например, тонн
+# Целая единица, родительный падеж, множественное число. Например, тонн
-      Сокращенное наименование целой единицы. Например, т
+# Сокращенное наименование целой единицы. Например, т.
-      Дробная единица, именительный падеж, единственное число. Например, килограмм
+# Дробная единица, именительный падеж, единственное число. Например, килограмм
-      Дробная единица, родительный падеж, единственное число. Например, килограмма
+# Дробная единица, родительный падеж, единственное число. Например, килограмма
-      Дробная единица, родительный падеж, множественное число. Например, килограмм
+# Дробная единица, родительный падеж, множественное число. Например, килограмм
-      Сокращенное наименование дробной единицы. Например, кг
+# Сокращенное наименование дробной единицы. Например, кг
-      Строка, которая будет подставлена, если задан флаг partSubstWhenZero
+# Строка, которая будет подставлена, если задан флаг partSubstWhenZero
-      Десятичный разделитель. Если не задан, то используется разделитель из настроек операционной системы
+# Десятичный разделитель. Если не задан, то используется разделитель из настроек операционной системы
-      Разделитель групп цифр (тысяч). Если не задан, то используется разделитель из настроек операционной системы
+# Разделитель групп цифр (тысяч). Если не задан, то используется разделитель из настроек операционной системы
-      Знак валюты. Например, Br
+# Знак валюты. Например, Br
-      Код валюты по ISO. Например, 933
+# Код валюты по ISO. Например, 933
-      Код валюты. Например, BYN
+# Код валюты. Например, BYN
 ====Примеры использования====

@@ Строка 2: / Строка 2: @@
    const AFracBase: Integer; const ACase: Integer; const AParts: Integer; const ANames: String): String;}}
 <onlyinclude>Конвертирует число в строку.</onlyinclude>
 ====Примеры использования====

← Предыдущая		Версия 23:07, 2 июля 2016
Строка 2:		Строка 2:
	const AFracBase: Integer; const ACase: Integer; const AParts: Integer; const ANames: String): String;}}		const AFracBase: Integer; const ACase: Integer; const AParts: Integer; const ANames: String): String;}}
	<onlyinclude>Конвертирует число в строку.</onlyinclude>		<onlyinclude>Конвертирует число в строку.</onlyinclude>
		+
		+	====Примеры использования====
		+
		+	{\| border="1" cellpadding="4" cellspacing="0" style="border-collapse:collapse;"
		+	!style="background:#ffdead;"\| Вызов функции
		+	!style="background:#ffdead;"\| Результат
		+	\|-
		+	\|GetNumeral('@W#,##0.### @B @D0.#### @K', 0, 0, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 0 т 0 кг
		+	\|-
		+	\|GetNumeral('@W0 @F @D0 @C', 0, 0, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 0 тонн 0 килограмм
		+	\|-
		+	\|GetNumeral('@W @F @D @C', 0, 0, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Ноль тонн ноль килограмм
		+	\|-
		+	\|GetNumeral('@W @F @D @C', 0, 0, 3, caseName, partSubstWhenZero, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| --
		+	\|-
		+	\|GetNumeral('@W @F @D @C', 0, 0, 3, caseName, partHideFracWhenZero + partHideWholeWhenZero, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\|
		+	\|-
		+	\|GetNumeral('@W @F @D0 @K', 0, 0, 3, caseName, partHideWholeWhenZero, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 0 кг
		+	\|-
		+	\|GetNumeral('@W @F @D0 @K', 0, 0, 3, caseName, partHideFracWhenZero, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Ноль тонн
		+	\|-
		+	\|GetNumeral('@N#,##0.###', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 5 687.369
		+	\|-
		+	\|GetNumeral('@N#,##0.### @B', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 5 687.369 т
		+	\|-
		+	\|GetNumeral('@W#,##0.### @B @D000 @K', 5687.3694, 0.001, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 5 687 т 369 кг
		+	\|-
		+	\|GetNumeral('@W#,##0.### @B @D#.## @K', 5687.3694, 0, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 5 687 т 369.4 кг
		+	\|-
		+	\|GetNumeral('@W#,##0.### @B @D#.#### @K', 5687.36944, 0, 3, 0, caseName, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| 5 687 т 369.44 кг
		+	\|-
		+	\|GetNumeral('@W @F', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн
		+	\|-
		+	\|GetNumeral('@W @F @D @C', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн триста шестьдесят девять килограмм
		+	\|-
		+	\|GetNumeral('@W @F @D000 @K', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн 369 кг
		+	\|-
		+	\|GetNumeral('@W @F @D000.# @K', 5687.3694, 0, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн 369.4 кг
		+	\|-
		+	\|GetNumeral('@W @F @D000 @K', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн 369 кг
		+	\|-
		+	\|GetNumeral('@W @F @D000 @C', 5687.3694, 0.001, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн 369 килограмм
		+	\|-
		+	\|GetNumeral('@W @F @D000.#### @K', 5687.3694, 0, 3, caseName, 0, 'тонна,тонны,тонн,т,килограмм,килограмма,килограмм,кг,--,.," "') \|\| Пять тысяч шестьсот восемьдесят семь тонн 369.4 кг
		+	\|}