Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.06.26;
Скачать: CL | DM;

Вниз

Две даты   Найти похожие ветки 

 
AtoL2k2   (2003-06-12 09:56) [0]

Проблема следующая. Как узнать, относятся ли две даты к одному месяцу, если месяц заканчивается 25м числом. То есть например
с 26.01.2000 по 25.02.2000- это один месяц.
То есть две даты (произвольные) d1.m1.y1 и d2.m2.y2
нужно условие, попадают ли они в один месяц.

з.ы. Причем период с 26.12.2000 по 25.01.2001 тоже считается месяцем.


 
Sandman25 ©   (2003-06-12 10:17) [1]

if d1>25 then newD1 := date1 + 10
else newD1 := date1;
if d2>25 then newD2 := date2 + 10
else newD2 := date2;
odinPeriod := (Year(date1)=Year(date2)) and (Month(date1)=Month(date2));


 
AtoL2k2   (2003-06-12 10:52) [2]

to Sandman25 :
огромное спасибо
правда
odinperiod:=(year(newd1)=year(newd2))and (month(newd1)=month(newd2))
но ничего. Классно! до этого я проверял трехэтажное условие, которое к тому же не работало.

Причем, Ваш пример работает в SQL процедуре!
Еще раз огромное спасибо. Сам бы не догадался


 
Sandman25 ©   (2003-06-12 11:11) [3]

Да, извиняюсь за ошибку.
Я сначала тоже начал писать трехэтажное условие, а потом стало лень, и я решил заставить все рассчитываться автоматически :)



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

Текущий архив: 2003.06.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.038 c
14-84550
Omar2002
2003-06-06 17:16
2003.06.26
Мастер кривых враз


1-84278
Valentino
2003-06-08 05:30
2003.06.26
Помогите. Ошибка при работе со списком.


7-84786
_ALEXey_
2003-04-09 19:03
2003.06.26
Запрет всех контекстных меню в системе (ловушка)


3-83872
Dem
2003-06-02 12:06
2003.06.26
Как создать пароль на базу данных


6-84473
LOM
2003-04-10 14:59
2003.06.26
Вопрос по TTcpServer