TDateTimePicker - błąd przypisania wartości Date();

Koledzy, mam prośbę o pomoc.
Na początku napiszę, że na Win XP + D7 Pro działa ok, na Win7 32bit + D7 już nie działa. Chodzi o przypisanie aktualnej daty (czy w ogóle jakiejkolwiek daty do property Date komponentu DateTimePicker):

  dtpZadaniaZDnia.Date := EncodeDate(2013,11,15); {lub dtpZadaniaZDnia.Date := DateOf(Date); - tutaj w obu wersjach pojawia się błąd }
  dtpZadaniaZDnia.Format := ShortDateFormat; { lub Format := 'yyyy-MM-dd'; }
  dtpZadaniaZDnia.MaxDate := date; { jest ok }
  dtpZadaniaZDnia.MinDate := DateOf(incDay(date, dniWsteczMax)); { jest ok }

wyjątek:

Debugger Exception Notification

Project Project1.exe raised exception class ECommonCalendarError with message 'Failed to set calendar date or time'. Process stopped. Use Step or Run to continue.

OK Help

Nie mam pojęcia w czym leży przyczyna problemu, google o tym nie wspominają niestety.

spróbuj najpierw ustawić min i maxdate oraz format a potem ustawić date.

@tomix: Nie bardzo rozumiem. Taki kod jak wkleiłeś jest ok, to jaki nie jest ok? Co generuje taki wyjątek jak podałeś? Ponieważ u mnie na Windows 7 64 bit Ultimate PL pod Delphi 7 Personal, podanie ujemnej wartości dla zmiennej DniWsteczMax - działa ok i powinno być ok. Tylko podanie dodatniej będzie źle, ale wtedy masz jest inny komunikat wyjątku. Ale to logiczne. A dla ustawiania formatu ja zawsze wolę zrobić tak, jak poniżej. Tutaj pod kątem nietypowego formatu wyświetlania czasu bez sekund (dodaj moduł CommCtrl do sekcji uses).

DateTime_SetFormat(SomeValueOfTimeDTP.Handle, PChar('HH:mm'));