Определение сезона (зима/лето) по дате

← →
DIR3ct0r © (2006-04-18 09:21) [0]

Никто не сталкивался с такой проблемой, если что известно подскажите пожайлуста

← →
TUser © (2006-04-18 09:29) [1]

Надо определить месяц. Декабрь, яинварь, февраль - зима. Далее по три месяца.

← →
Сергей М. © (2006-04-18 09:43) [2]

case MonthOf(SomeDate) of
12,1,2: зима;
3,4,5: весна;
6,7,8: лето;
9,10,11: осень;
end;

← →
DIR3ct0r © (2006-04-18 09:46) [3]

суть такова....сезонный перевол часов производится 2 раза в год (с зимнего на летнее время, с летнего на зимнее).

необходимо определить: в какой момент сезона находится Дата.

← →
Сергей М. © (2006-04-18 10:14) [4]

> DIR3ct0r © (18.04.06 09:46) [3]

Никак ты это не определишь.
Одну и ту же дату можно трактовать по-разному - с учетом и без учета фактического "перевода стрелок".

2:00 в ночь перехода на зимнее время (стрелки на час назад) можно рассматирвать и как "лето" (до наступления "зимы" остался 1 час) и как "зиму" (в 3:00 "лето" только что кончилось и стрелки переведены на 1 час назад)

← →
Сергей М. © (2006-04-18 10:16) [5]

К тому же, если не ошибаюсь, моменты смены "сезонов" не фиксированы, а приурочиваются всякий раз к ближайшим выходным дням.

← →
Игорь Шевченко © (2006-04-18 10:19) [6]

> в какой момент сезона находится Дата.

GetTimeZoneInformation

"DaylightDate

Specifies a SYSTEMTIME structure that contains a date and UTC when the transition from standard time to daylight time occurs on this operating system. "

Интересно, если Date говорит, что сегодня 18 апреля, но это 18 апреля в Сиднее, то что это, - весна или осень?

> Сергей М. © (18.04.06 09:43) [2]
> case MonthOf(SomeDate) of
> 12,1,2: зима;
> 3,4,5: весна;
> 6,7,8: лето;
> 9,10,11: осень;
> end;

патч для жителей крайнего севера

case MonthOf(SomeDate) of
1,2,3,4,5,6: ночь;
7,8,9,10,11,12: день;
end;

> патч для жителей крайнего севера

Хм ..

Эдак можно сотворить патчи для прапорщиков, медведей, валенок, пива ..

Определение сезона (зима/лето) по дате Найти похожие ветки