Работа с датой

← →
Михаил Н © (2007-03-24 17:17) [0]

Здравствуйте.Заранее извиняюсь за ламерский вопрос.
У меня есть переменная Adate типа Tdate. мне необходимо реализовать прибавление к этой переменной определённого количества месяцев.Напишите пример того,как это можно сделать

← →
Михаил Н © (2007-03-24 17:34) [1]

И еще хочу добавить :
при попытки увеличть дату на определённое количество месяцев,получается совсем неправильный результат.
при выполнение операиwи Adate:=Adate1+incmonth(Adate1,Dlit) получаю дату увеличенную на лет 100,а не как требовалось 8 месяцев

← →
Михаил Н © (2007-03-24 17:42) [2]

И еще один вопрос не в тему.
какой процедурой удалить запись из типизированного файла?

← →
Джо © (2007-03-24 17:46) [3]

> [2] Михаил Н © (24.03.07 17:42)
> И еще один вопрос не в тему.
> какой процедурой удалить запись из типизированного файла?

Нет такой процедуры.

← →
Джо © (2007-03-24 17:50) [4]

> [1] Михаил Н © (24.03.07 17:34)
> И еще хочу добавить :
> при попытки увеличть дату на определённое количество месяцев,
> получается совсем неправильный результат.
> при выполнение операиwи Adate:=Adate1+incmonth(Adate1,Dlit)
> получаю дату увеличенную на лет 100,а не как требовалось
> 8 месяцев

ADate := IncMonth(ADate,MonthCount)

← →
Anatoly Podgoretsky © (2007-03-24 17:51) [5]

> Михаил Н (24.03.2007 17:34:01) [1]

А зачем ты складываешь даты, ерунда получится.

ну а как тогда подсчитать дату,которая будет через 8 месяц от текущей?

> Михаил Н © (24.03.07 17:34) [1]
> при выполнение операиwи Adate:=Adate1+incmonth(Adate1,Dlit)

Вот это с каким смыслом здесь написал?

> Михаил Н © (25.03.07 01:19) [6]
>
> ну а как тогда подсчитать дату,которая будет через 8 месяц
> от текущей?
>

Добрый дядя Джо тебе уже ответил: Джо © (24.03.07 17:50) [4]

Работа с датой Найти похожие ветки