Der folgende Class Helper stellt dafür eine Methode zur Verfügung:
Delphi-Quellcode:
type
TDateTimePickerHelper = class helper for TDateTimePicker
public
procedure ShowMonthCalendar;
end;
procedure TDateTimePickerHelper.ShowMonthCalendar;
begin
MonthCal_SetCurrentView(CalendarHandle, MCMV_YEAR);
end;