• Registered: 2015-04-04
  • Posts: 262

Topic: DateTimePicker и все что с ним связано

На форме имеется DateTimePicker1 (это день рождения) и Edit1 (возраст). Надо чтобы при выборе даты дня рождения в Edit1 показалась возраст. Знаю что надо использовать YearsBetween(,), но не знаю как. Примерно написал так, но не получается.

procedure NovayaForma_DateTimePicker1_OnChange (Sender: string);
begin
NovayaForma.Edit1.Text:= YearsBetween(now,NovayaForma.DateTimePicker1);
end;

Как быть?

  • Registered: 2015-04-04
  • Posts: 262

Re: DateTimePicker и все что с ним связано

Все разобрался. Тема закрыта.

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

Re: DateTimePicker и все что с ним связано

Та же проблема возникла. Подскажите решение, пожалуйста.

Slava.Pepper's Website

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

Re: DateTimePicker и все что с ним связано

Slava.Pepper wrote:

Та же проблема возникла. Подскажите решение, пожалуйста.

procedure NovayaForma_DateTimePicker1_OnChange (Sender: string);
begin
NovayaForma.Edit1.Value:= YearsBetween(now,NovayaForma.DateTimePicker1.DateTime);
end;

Dmitry.
  • From: Украина, Киев
  • Registered: 2014-10-23
  • Posts: 405

Re: DateTimePicker и все что с ним связано

Здравствуйте! В DateTimePicker мне нужен только год. Установил для него формат = yyyy, DateMode =  UpDown, Kind = MonthYear. В самом DateTimePicker виден только год и есть возможность стрелками вверх-вниз выбирать нужное значение. Но в таблицу сохраняет в формате DD.MM.yyyy. Как сделать, чтобы сохранялся только год?

Не боги горшки лепят!
  • Registered: 2014-02-14
  • Posts: 10,294

Re: DateTimePicker и все что с ним связано

kunar80
Для сохранения года логичней использовать поле с типом "Целое число" и компонент TextBox

Dmitry.