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

lcl: fixed compilation fpc 2.7.1

Browse Source 
git-svn-id: trunk@37592 -
This commit is contained in:
mattias 2012-06-08 11:58:00 +00:00
parent 53b364d771
commit 06b31d577e
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/include/lclintf.inc
View File

@ -34,7 +34,7 @@
//##apiwiz##sps## // Do not remove //##apiwiz##sps## // Do not remove
function AddEventHandler(AHandle: THandle; AFlags: dword; function AddEventHandler(AHandle: THandle; AFlags: dword;
AEventHandler: TWaitHandleEvent; AData: PtrInt = 0): PEventHandler; AEventHandler: TWaitHandleEvent; AData: PtrInt): PEventHandler;
begin begin
Result := WidgetSet.AddEventHandler(AHandle, AFlags, AEventHandler, AData); Result := WidgetSet.AddEventHandler(AHandle, AFlags, AEventHandler, AData);
end; end;