Вычисление дат
MicroCip Дата: Чт, 21 Июля 2011, 15:35 | Сообщение # 1
Значит тут такое дело, нужно узнать завтрашнюю и послезавтрашнюю дату. Пробовал сделать: Code
SetVar "[Data_z]" "[DayNum]+1" SetVar "[Data_pz]" "[DayNum]+2"
Но тут подумал, а вдруг сегодня 31, а получится программа покажет 32 и 33. Или сейчас 28 февраля т.д. нужно учитывать и високосный год...
В каждом человеке солнце. Только дайте ему светить.(с)Сократ
Сообщение Значит тут такое дело, нужно узнать завтрашнюю и послезавтрашнюю дату. Пробовал сделать: Code
SetVar "[Data_z]" "[DayNum]+1" SetVar "[Data_pz]" "[DayNum]+2"
Но тут подумал, а вдруг сегодня 31, а получится программа покажет 32 и 33. Или сейчас 28 февраля т.д. нужно учитывать и високосный год... Автор - MicroCip Дата добавления - 21 Июля 2011 в 15:35
mishem Дата: Чт, 21 Июля 2011, 15:39 | Сообщение # 2
http://pascal.sources.ru/faq/subdate.htm
Не хочешь читать хелп? Если хелп и форум не помогли, тогда все ответы здесь Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
MicroCip Дата: Чт, 21 Июля 2011, 20:00 | Сообщение # 3
Мне кажется это не совсем то, что мне нужно...
В каждом человеке солнце. Только дайте ему светить.(с)Сократ
Сообщение Мне кажется это не совсем то, что мне нужно... Автор - MicroCip Дата добавления - 21 Июля 2011 в 20:00
Alien Дата: Чт, 21 Июля 2011, 20:08 | Сообщение # 4
А что мешает сделать так: Code
DateToNum "[DateShort]" "d/m/y" "[date]" SetVar "[date]" "[date]+1" NumToDate "[date]" "Default" "[date_next]"
[date_next] будет содержать завтрашнюю дату
Сообщение отредактировано Alien - Чт, 21 Июля 2011, 20:09
Сообщение А что мешает сделать так: Code
DateToNum "[DateShort]" "d/m/y" "[date]" SetVar "[date]" "[date]+1" NumToDate "[date]" "Default" "[date_next]"
[date_next] будет содержать завтрашнюю дату Автор - Alien Дата добавления - 21 Июля 2011 в 20:08
Сообщение Quote (Alien )
А что мешает сделать так:
Я и не знал что такая команда есть. Автор - mishem Дата добавления - 21 Июля 2011 в 20:26
Alien Дата: Чт, 21 Июля 2011, 20:27 | Сообщение # 6
Quote (mishem )
Я и не знал что такая команда есть.
SetVar?
Сообщение
Quote (mishem )
Я и не знал что такая команда есть.
SetVar?
Автор - Alien Дата добавления - 21 Июля 2011 в 20:27
mishem Дата: Чт, 21 Июля 2011, 20:30 | Сообщение # 7
Не хочешь читать хелп? Если хелп и форум не помогли, тогда все ответы здесь Если вы думаете, что сможете — вы сможете, если думаете, что нет — вы правы.
Сообщение Автор - mishem Дата добавления - 21 Июля 2011 в 20:30
MicroCip Дата: Чт, 21 Июля 2011, 21:34 | Сообщение # 8
Quote (Alien )
А что мешает сделать так:
В каждом человеке солнце. Только дайте ему светить.(с)Сократ
Сообщение Quote (Alien )
А что мешает сделать так:
Автор - MicroCip Дата добавления - 21 Июля 2011 в 21:34