|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Вопрос по преобразованию даты.
Добрый день!
У меня следующий вопрос по работе с датами: Допустим имеется переменная starttime:=date; Поскажите пожалуйста, как увеличить startime, например, на 5 дней не преобразуя тип переменной в integer. Пробовал через DecodeDate, работает, но возникает проблема с количеством дней в месяце. Процедура не понимает что в этом месяце 29, а в следующем 31 день и увеличивает число строго на заданное количество дней. Возникает полная кривота (вроде 34 февраля ). Заранее спасибо! |
#2
|
|||
|
|||
Черт, все просто:
var StartTime:TdateTime; Begin StartTime:=date; //текущая дата; ShowMessage(datetostr(starttime)); StartTime:=StartTime+5; ShowMessage(datetostr(starttime)); end; На одной моей машине такая вариация работает, на другой нет Видать,Дельфя криво стоит |