Gedemin TLB.IgsApplication.GetComplexCase
Материал из GedeminWiki
(Различия между версиями)
SYSDBA (обсуждение | вклад) |
SYSDBA (обсуждение | вклад) |
||
| Строка 1: | Строка 1: | ||
{{MethodDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|visibility=public|class={{#explode:{{PAGENAME}}|.|1}}|src=function GetComplexCase(const TheWord: WideString; TheCase: Integer): WideString; safecall;}} | {{MethodDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|visibility=public|class={{#explode:{{PAGENAME}}|.|1}}|src=function GetComplexCase(const TheWord: WideString; TheCase: Integer): WideString; safecall;}} | ||
| − | <onlyinclude>...</ | + | <onlyinclude>Склоняет переданную строку.</onlyinclude> |
| + | |||
| + | функция принимает на вход строку следующего вида: | ||
| + | |||
| + | [[Определение] [Определение]...] Наименование [Остаток] | ||
| + | |||
| + | Определение -- это прилагательное: главный, старший, ведущий, главная, и т.п. Наименование -- это одно слово или N слов, написанных через дефис. Наименование из одного слова склоняется по правилам склонения. | ||
| + | В наименовании из N слов, написанных через дефис, склоняется каждое из слов по правилам склонения. Остаток не склоняется. Определение и Наименование должны быть заданы в именительном падеже и единственном числе. | ||
| + | |||
| + | Пример: | ||
| + | |||
| + | <syntaxhighlight lang="vbnet"> | ||
| + | Dim I, S | ||
| + | S = "" | ||
| + | For I = 1 To 6 | ||
| + | S = S & Application.GetComplexCase("Первый жировой участок", I) & vbCrLf | ||
| + | Next | ||
| + | |||
| + | MsgBox S | ||
| + | </syntaxhighlight> | ||
===Константы=== | ===Константы=== | ||
Версия 12:25, 28 мая 2017
From Gedemin TLB.pas
function GetComplexCase(const TheWord: WideString; TheCase: Integer): WideString; safecall;
Unit: Gedemin TLB
Type: function
Visibility: public
Member Of: IgsApplication
Описание
Склоняет переданную строку.
функция принимает на вход строку следующего вида:
[[Определение] [Определение]...] Наименование [Остаток]
Определение -- это прилагательное: главный, старший, ведущий, главная, и т.п. Наименование -- это одно слово или N слов, написанных через дефис. Наименование из одного слова склоняется по правилам склонения. В наименовании из N слов, написанных через дефис, склоняется каждое из слов по правилам склонения. Остаток не склоняется. Определение и Наименование должны быть заданы в именительном падеже и единственном числе.
Пример:
Dim I, S S = "" For I = 1 To 6 S = S & Application.GetComplexCase("Первый жировой участок", I) & vbCrLf Next MsgBox S
Константы
' Падежи csNominative = 1 ' Именительный КТО-ЧТО csGenitive = 2 ' Родительный КОГО-ЧЕГО csDative = 3 ' Дательный КОМУ-ЧЕМУ csAccusative = 4 ' Винительный КОГО-ЧТО csInstrumentale = 5 ' Творительный КЕМ-ЧЕМ csPreposizionale = 6 ' Предложный О КОМ-О ЧЕМ ' Род gdMasculine = 0 ' Мужской род gdFeminine = 1 ' Женский род gdMedium = 2 ' Средний род gdPlural = 3 ' Множественное число ' Имя nmNar = 0 ' Имя нарицательное nmOwn = 1 ' Имя собственное nmNum = 2 ' Имя числительное
