Тема: Работа с датой
Показать сообщение отдельно
  #2  
Старый 28.05.2010, 23:15
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
  
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию
ну примерно так:
Код:
uses  DateUtils
IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1):TDateTime
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием