|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
помогите с Datetimipicker
Подскажите пожадуйста , как сделать чтобы при смене месяца в году менялся и год в datetimepicker?datetimepicker имеет следующий вид datemode=dmUpDown,
Код:
procedure TForm1.DateTimePicker1Change(Sender: TObject); DateTime_SetFormat(DateTimePicker1.Handle, pChar('MMMMMMMMM yyyy')); BlankDate := FALSE; |
#2
|
|||
|
|||
Не совсем понятно, что ты хочешь.
Напиши подробнее. С какого бодуна год должен меняться... |
#3
|
|||
|
|||
когда я счелкаю на Dtpickere меняеться только та часть которая выбрана т е сначала месяц ,а мне надо чтобы при смене последнего месяца менялся и год .Пример декабрь 2008 ,январь 2009 . Можно вообще так сделать?
|
#4
|
|||
|
|||
На:
Код:
procedure TForm1.DateTimePicker1Change(Sender: TObject); var ADate : TDateTime; begin ADate := DateTimePicker1.Date; If FDate <> 0 Then Begin DateTimePicker1.DateTime := IncYear(ADate,(MonthOf(ADate) - MonthOf(FDate)) div -11); End; FDate := ADate; end; FDate - TDateTime. Надо ее инициализировать при входе в окно текущим значением в компоненте. Да, задачка оказалась интересной.. Пришлось немного покумекать мозгами |
#5
|
|||
|
|||
Большое тебе спасибо !
|