|
#1
|
|||
|
|||
DateUtils
Если кто то может объясните, как мне задать выходные дни в текущем месяце, если кол-во дней в текущем месяце определено
Код:
var YYYY, MM, DD: Word; D: TDateTime; begin DecodeDate(Date, YYYY, MM, DD); D := EndOfAMonth(YYYY,8); DecodeDate(D, YYYY, MM, DD); showmessage(inttostr(dd)); end; |
#2
|
||||
|
||||
В начале был Бит, потом Байт и только потом появилось Слово... |
#3
|
|||
|
|||
А как задать в сентябре 3,4,10,11,17,18,24,25 выходными днями?
Последний раз редактировалось t116, 22.08.2011 в 11:57. |
#4
|
|||
|
|||
Разобрался. Только почему то функция DayOfTheWeek индекс (1) выводит воскресенье, а должна понедельник
Последний раз редактировалось t116, 22.08.2011 в 12:21. |
#5
|
||||
|
||||
Правильно она выводит, на америкосовский стандарт. У них неделя начинается с воскресенья.
Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#6
|
||||
|
||||
а точно DayOfTheWeek и DayOfWeek не перепутал?
Цитата:
Пишу программы за еду. __________________ |
#7
|
|||
|
|||
Все правильно я использовал не ту функцию(DayOfWeek), а надо DayOfTheWeek.
Спасибо. |