1 Topic by vojaka (edited by vojaka 2017-07-18 07:29:19)

  • Registered: 2014-10-24
  • Posts: 40

Topic: Добавление к дате определенного периода

Добрый день!

Сижу ломаю голову. На форме fAddBron при установке чекбокса (принят с испытанием сроком на) и при выбору значения длительности испытательного срока нужно полученную дату подставить в dtpDataOforF4 (Дата оформления отсрочки от призыва:). В принципе с периодом 1 год нормально, но как добавить количество месяцев. При нашем примере например 6 месяцев. Ругается на inalid argument to dare encode. Может это можно сделать как-то проще. Проект прикладываю.

Только сейчас заметил, что еще не реализовал подключение поля даты принятия на работу и срок испытания прибавляется к текущей дате.

Post's attachments

Attachment icon bron.rar 303.7 kb, 370 downloads since 2017-07-18 

  • Registered: 2014-10-24
  • Posts: 40

Re: Добавление к дате определенного периода

Вопрос решен использованием функции IncMonth, но почему-то IncYear не работает.

Кому надо пример:
MyData:=IncMonth(MyData,6);  // добавляем 6 месяцев.
Form1.DateTimePicker1.DateTime :=MyData; // меняем в DateTimePicker дату с учетом увеличения на 6 месяцев

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Добавление к дате определенного периода

но почему-то IncYear не работает.

Можно просто прибавить 12 месяцев IncMonth(MyData,12)

Dmitry.
  • Registered: 2014-10-24
  • Posts: 40

Re: Добавление к дате определенного периода

Я так и сделал. Тогда еще вопрос, а добавление дней IncDay работает?

  • Registered: 2014-02-14
  • Posts: 10,294

Re: Добавление к дате определенного периода

vojaka wrote:

Я так и сделал. Тогда еще вопрос, а добавление дней IncDay работает?

Нет, вместо этого к дате можете просто добавить единицу

MyData + 1
Dmitry.