Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

data [D7, XP]


гостььь ©   (2006-03-03 15:12:00) 

Доброе время суток!
как из даты вычесть 10 дней
Например 09.11.05 - 10 дней = 31.10.05


Vlad   (2006-03-03 15:40:00) [1]


> palva ©   (03.03.06 15:28) [2]


> Что-то неправильно работает - округления что ли?

Все правильно работает, это у автора неправильно


palva   (2006-03-03 15:28:00) [2]

Что-то неправильно работает - округления что ли?

{$APPTYPE CONSOLE}
uses SysUtils;
var
 d: TDateTime;
begin
 d := StrToDate('09.10.05');
 d := d - 10;
 WriteLn(DateToStr(d)); // 29.09.2005
end.


Сергей М.   (2006-03-03 15:16:00) [3]

Новая_дата = Дата - 10


Наверх

Титульная страница Поиск, карта сайта Написать письмо