mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-08 07:21:34 +02:00
lcl: fixed compilation fpc 2.7.1
git-svn-id: trunk@37592 -
This commit is contained in:
parent
53b364d771
commit
06b31d577e
@ -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;
|
||||
|
Loading…
Reference in New Issue
Block a user