Текущий архив: 2006.10.22;
Скачать: 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 вся ветка
Текущий архив: 2006.10.22;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.058 c
