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

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

DateTimePicker [D2005, XP]


девушка ©   (2009-02-24 09:11:00) 

Добрый день!
Вопрос по настройкам DateTimePicker.

Настраиваю чтобы отображалась дата в формате "месяц год".
Например: "Февраль 2009".

Настройки:
DateFormat: dfLong
DateMode: dmUpDown
Format: MMMM yyyy

Вопрос:
При нажати на UpDown - сначала прокручивается месяц, а для того чтобы изменился год - надо выделить год. Т.е. даты идет так:
"Февраль 2009", "Январь 2009", "Декабрь 2009", "Январь 2009".
А хочется чтобы шли так:
"Февраль 2009", "Январь 2009", "Декабрь 2009", "Январь 2008".

Настроить как-то можно? или только ловить ручками на событиях???


Johnmen   (2009-02-24 13:00:00) [1]

Да, ручками. Обработать OnChange, типа того:

DecodeDate(DateTimePicker.Date,Year,Month,Day);
if (Month=12) and (LastMonth=1) then
 DateTimePicker.Date:=EncodeDate(Year-1,Month,Day)
else
if (Month=1) and (LastMonth=12) then
 DateTimePicker.Date:=EncodeDate(Year+1,Month,1);
LastMonth:=Month;

когда крутится месяц. Для года сама сообразишь...


девушка   (2009-02-24 09:42:00) [2]

Просто хочу чтобы когда на DateTimePicker нажимаешь вниз - дата уменьшалась вся.

Пардон, ошибка:
"Февраль 2009", "Январь 2009", "Декабрь 2009", "Ноябрь 2009".
А хочется чтобы шли так:
"Февраль 2009", "Январь 2009", "Декабрь 2008", "Ноябрь 2008".


Johnmen   (2009-02-24 09:37:00) [3]

Не могу понять, какое правило в следовании этих январей-февралей?


Наверх

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