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

hook windowproc for Calendar Control, fixes memlead and issue #980

Browse Source 
git-svn-id: trunk@7835 -
This commit is contained in:
vincents 2005-09-26 11:45:59 +00:00
parent d2928d98c7
commit 49c2b27945
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -76,7 +76,7 @@ begin
pClassName := 'SysMonthCal32';
WindowTitle := StrCaption;
Flags := WS_CHILD or WS_VISIBLE;
SubClassWndProc := nil;
SubClassWndProc := @WindowProc;
end;
// create window
FinishCreateWindow(AWinControl, Params, false);