Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Правильное сопряжение числа со словом [D7, WinXP]

kyn66 © (2009-07-16 16:13:00)
Уважаемые мастера, решил написать функцию для определения разности в в датах с помощью стандартной функции Rx DateDiff(D1, D2, D, M, Y)Данная функция возвращает числами разницу в периодах. К примеру мне получится известным значение дней 1 или 3 или 25. В данном случае мне нужно будет написать соответственно день, дня и дней. Есть-ли какая уже готовая функция, которая по числу сама ставила правильное сопряжение слова?
Спасибо.

kyn66 (2009-07-17 09:04:00) [1]
2Сергей М

Спасибо, сечас применим...

Германн (2009-07-17 01:33:00) [2]

> kyn66 © (16.07.09 16:13)
>
> Уважаемые мастера, решил написать функцию для определения
> разности в в датах с помощью стандартной функции Rx DateDiff(D1,
> D2, D, M, Y) Данная функция возвращает числами разницу
> в периодах. К примеру мне получится известным значение дней
> 1 или 3 или 25.

Ну теперь у нас к всеобще известной функции IncDay добавится ещё одна всеобще известная! Ёжка расчищай место на своей стенке!
:)

KilkennyCat (2009-07-16 19:54:00) [3]
и не говори...

Сергей М. (2009-07-16 19:00:00) [4]

> дует на башку.

Да уж .. с башкой проблемы ..

KilkennyCat (2009-07-16 18:55:00) [5]
гм... а ведь я изначально хотел днев... но почекму-то написал дню... наверняка, из-за кондиционера - дует на башку.

Anatoly Podgoretsky (2009-07-16 18:54:00) [6]
> KilkennyCat (16.07.2009 17:53:02) [2]

Например 11 mod 10 день

Сергей М. (2009-07-16 18:48:00) [7]

> KilkennyCat © (16.07.09 17:53) [2]

Тогда уж
else
.. днёв ..

KilkennyCat (2009-07-16 17:53:00) [8]

> Сергей М. © (16.07.09 17:40) [1]

правильней:
case Разница mod 10 of
0, 5..9: .. дней..
1: .. день ..
2..4: .. дня ..
else
..дню...
end;

Сергей М. (2009-07-16 17:40:00) [9]
case Разница mod 10 of
0, 5..9: .. дней..
1: .. день ..
2..4: .. дня ..
end;

))

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »