Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Для новичков > TDateTime - сложение даты))

Автор: uranpro 5.6.2008, 11:12

Код


...
mdate:TDateTime
begin

mdate:=date + '01.00.0000';

...

хочу прибавить 1 день к дате, выдает ошибку, когда использую процедуру
если написать date+'01.01.01', то будет 06.07.2009

в чем трабл ? как прибавить к дате 1 день ? что будет, если прибавить к 31 числу 2 ?

Автор: pseud 5.6.2008, 11:15

Код


  showmessage('завтра' + DateToStr(Date + 1));

Автор: ama_kid 5.6.2008, 11:23

Цитата(uranpro @ 5.6.2008, 11:12

)

в чем трабл ?

В том, что TDateTime - это ни что иное, как Float, а к нему строку просто так не прибавишь smile

Цитата(uranpro @ 5.6.2008, 11:12

)

как прибавить к дате 1 день ?

inc(mdate);

Цитата(uranpro @ 5.6.2008, 11:12

)

что будет, если прибавить к 31 числу 2 ?

Экспериментируй... smile

Автор: uranpro 5.6.2008, 11:32

спасяб) сча посмотрим) smile

Автор: Beltar 5.6.2008, 14:44

Цитата

В том, что TDateTime - это ни что иное, как Float

Поправка. Не float (32 бита), а Double. smile

2 uranpro:

Целая часть это номер дня, с начала компьютерных времен, а дробная время суток. И можно выделить любую часть через trunk и frac. Ну и т. д. и т. п. арифметика.