Скачать: CL | DM;

Последний день месяца   Найти похожие ветки 

← →
aht ©   (2006-10-02 14:00) [0]

помогите вспомнить сабжевую функцию, плиз

---

← →
Sergey13 ©   (2006-10-02 14:01) [1]

Первый день следующего месяца - 1.

---

← →
aht ©   (2006-10-02 14:28) [2]

не, ну это понятно, но тогда надо проверку на последний месяц в году делать и т.д. и т.п., но ведь должная быть функция стандартная...

---

← →
SergP ©   (2006-10-02 14:49) [3]

> [2] aht ©   (02.10.06 14:28)
> не, ну это понятно, но тогда надо проверку на последний
> месяц в году делать и т.д. и т.п., но ведь должная быть
> функция стандартная...


Стандартная есть. Правда непомню какая....
Но в принципе можно самому написать.
Если поXORить 0 и 3 биты номера месяца, то получим 0 для тех месяцев где 30 дней и 1 для тех где 31 (единственное исключение - февраль)

---

← →
stone ©   (2006-10-02 15:17) [4]

DaysInAMonth

---

← →
Джо ©   (2006-10-03 02:27) [5]

Делаем константу-массив из 12 элементов и всех делов :)

---

← →
Германн ©   (2006-10-03 02:40) [6]

См. RxLib
function LastDayOfPrevMonth: TDateTime;
2 Джо ©   (03.10.06 02:27) [5]
И не забываем про високосные годы!

---

← →
novill ©   (2006-10-03 09:14) [7]

что вы все усложняете

DateUtils

Category

date/time routines

function EndOfAMonth(const AYear, AMonth: Word): TDateTime;

---

← →
aht ©   (2006-10-03 09:28) [8]

во! пасибы большие!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.028 c