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

Вниз

определение недели по дате   Найти похожие ветки 

 
Std   (2006-04-06 00:07) [0]

есть дата, например 05.04.2006, необходимо вывести интервал недели в которую входит эта дата. Например для этой даты нада шоб вывело  03.04.2006-09.04.2006


 
Anatoly Podgoretsky ©   (2006-04-06 00:10) [1]

DayOfTheWeek и несложная математика из начальной школы.


 
SergP ©   (2006-04-06 00:29) [2]


dt,d1,d2:TDate;
...
k:=DayOfWeek(dt);
if k=1 then k:=8; // у буржуев неделя начинается с воскресенья а у нас с понедельника
d1:=trunc(dt)-k+2; // начальная дата
d2:=d1+6; // конечная дата
Label1.Caption:=DateToStr(d1)+"-"+DateToStr(d2); // вывод к примеру в лейбл


 
Anatoly Podgoretsky ©   (2006-04-06 00:58) [3]

А у европецев с понедельника DayOfTheWeek


 
Std   (2006-04-06 01:09) [4]

хмм, а если прогу будут юзать и те и те, как узнать у кого с понедельника а у кого с воскресенья? или может можна как то и для тех и для тех зделать?


 
Юрий Зотов ©   (2006-04-06 02:30) [5]

> Std   (06.04.06 01:09) [4]

Спросить у юзера, с какого дня у него начинается неделя и сохранить в настройках. Так поступает, например, MS Project.


 
Anatoly Podgoretsky ©   (2006-04-06 09:13) [6]

Std   (06.04.06 01:09) [4]
Универсально нет, а вот два паралельных алгоритма всегда пожалуйста, но тогда надо 7 алгоритмов.


 
Std   (2006-04-06 12:57) [7]

ладно, с этим разобрался, а вот как поступить с месяцем? как узнавать начало и конец месяца, причем что бы и в высокосный год показало правильно февраль


 
SergP ©   (2006-04-06 15:01) [8]

Начало месяца обычно является 1 число...

А как найти конец месяца - вариантов целая куча... даже не знаю какой тебе написать


 
Std   (2006-04-06 16:03) [9]

та мне любой, лиш бы нормально работало с высокосным годом :)


 
Джо ©   (2006-04-06 17:07) [10]

Посмотрел бы все-таки, DateUtils.pas, а?

function DaysInAMonth(const AYear, AMonth: Word): Word;


 
Alarm ©   (2006-04-06 18:18) [11]

http://articles.org.ru/cfaq/index.php?qid=2058&frommostrecent=yes


 
Std   (2006-04-07 15:18) [12]

оказывается есть такое чудо как StartOfTheMonth и EndOfTheMonth для месяца, EndOfTheWeek, StartOfTheWeek для недели
по крайней мере в 2006 делфи есть :)



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

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

Наверх




Память: 0.49 MB
Время: 0.046 c
2-1144318090
Рафик
2006-04-06 14:08
2006.04.23
ADO


9-1127156871
KOT_BEGEMOT
2005-09-19 23:07
2006.04.23
Поворот спрайта в сторону курсора (DelphiX)


2-1144238366
tigra
2006-04-05 15:59
2006.04.23
override


2-1144417209
KSN
2006-04-07 17:40
2006.04.23
Проблема с отображением MDIСhild


3-1140673919
vlgrig1961
2006-02-23 08:51
2006.04.23
Портятся индексы как с этим бороться