lcl: fixed compilation fpc 2.7.1

git-svn-id: trunk@37592 -
This commit is contained in:
mattias 2012-06-08 11:58:00 +00:00
parent 53b364d771
commit 06b31d577e

View File

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