Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Как узнать колличество дней в месяце? [D6, 95/98, XP]


NSA ©   (2006-06-16 14:12:00) 

Сабж.


SergP.   (2006-06-17 07:05:00) [1]

Для всех месяцев кроме февраля:
ColDay:=((Month shr 3) xor Month) or 30;

Февраль считаем отдельно, так как там учитывается еще и високосность года.


tButton   (2006-06-16 15:10:00) [2]

странно... я всегда это case'ом делал...


MsGuns   (2006-06-16 14:19:00) [3]

DateUtils


MBo   (2006-06-16 14:18:00) [4]

DaysInAMonth


blackcrazzy   (2006-06-16 14:15:00) [5]

Посмотреть на календарь.


Наверх

Титульная страница Поиск, карта сайта Написать письмо