paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-18 16:19:13 +02:00
Code Issues Packages Projects Releases Wiki Activity

Win32: Return cpDate in TWin32WSCustomCalendar.HitTest when user clicks on "Today". Issue #0029895.

Browse Source 
git-svn-id: trunk@52055 -
This commit is contained in:
bart 2016-03-25 12:44:39 +00:00
parent fce82bdea5
commit db7cf0af86
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/interfaces/win32/win32wscalendar.pp
View File

@ -150,7 +150,8 @@ begin
case HitPart of case HitPart of
MCHT_CALENDARDATE, MCHT_CALENDARDATE,
MCHT_CALENDARDATENEXT, MCHT_CALENDARDATENEXT,
MCHT_CALENDARDATEPREV: Result := cpDate; MCHT_CALENDARDATEPREV,
MCHT_TODAYLINK: Result := cpDate;
MCHT_CALENDARWEEKNUM : Result := cpWeekNumber; MCHT_CALENDARWEEKNUM : Result := cpWeekNumber;
MCHT_TITLEBK: Result := cpTitle; MCHT_TITLEBK: Result := cpTitle;
MCHT_TITLEMONTH: Result := cpTitleMonth; MCHT_TITLEMONTH: Result := cpTitleMonth;