获得第一＆amp; TMonthCalendar中的最后可见日期

Question

有没有办法找出第一个和;最后可见 月份日历中的日期？

谢谢！

Answer 1

使用MonthCal_GetMonthRange：

  

检索日期信息（使用SYSTEMTIME结构），表示月份日历控件显示的上限和下限。

var
  times: array[0..1] of TSystemTime;
......
MonthCal_GetMonthRange(MonthCalendar1.Handle, GMR_DAYSTATE, @times[0]);

通话结束后，times[0]是系统时间记录，其中包含日历上显示的第一天，times[1]描述了上次显示的日期。

对于截图中的日历，这将在6月25日和10月7日返回。如果您通过了0而不是GMR_DAYSTATE，那么您将获得7月1日和9月30日。