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

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



Память: 0.47 MB
Время: 0.026 c