Вниз
Скачать: 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 вся ветка

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



Память: 0.45 MB
Время: 0.015 c
14-84713
dor
2003-06-05 14:41
2003.06.26
Господа,как из программы скачать определенный файл с инета


14-84527
Скорбящий
2003-06-06 18:01
2003.06.26
Ваше отношени к свингерам


7-84800
Ал
2003-04-16 15:27
2003.06.26
Как программно включить-выключить Active Desktop?


3-83876
ec
2003-05-29 18:57
2003.06.26
TDBImage


1-84099
Alibaba
2003-06-10 13:24
2003.06.26
TThread




   Наверх