paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-21 04:19:09 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Add TJSCloseEvent definition from Simon Ameis, bug ID 37425

Browse Source
This commit is contained in:
michael 2020-08-06 22:33:48 +00:00
parent c51ddda824
commit 601dfd5be7
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
packages/rtl/web.pas
View File

@ -791,6 +791,17 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property Total : NativeUINT Read FTotal; property Total : NativeUINT Read FTotal;
end; end;
TJSCloseEvent = class external name 'CloseEvent' (TJSEvent)
private
fcode: Word; external name 'code';
freason: TJSDOMString; external name 'reason';
fwasClean: Boolean; external name 'wasClean';
public
property code: Word read fcode;
property reason: TJSDOMString read freason;
property wasClean: Boolean read fwasClean;
end;
TJSPageTransitionEventHandler = reference to function(aEvent : TJsPageTransitionEvent) : boolean; safecall; TJSPageTransitionEventHandler = reference to function(aEvent : TJsPageTransitionEvent) : boolean; safecall;
TJSHashChangeEventhandler = reference to function(aEvent : TJSHashChangeEvent) : boolean; safecall; TJSHashChangeEventhandler = reference to function(aEvent : TJSHashChangeEvent) : boolean; safecall;
TJSMouseWheelEventHandler = reference to function(aEvent : TJSWheelEvent) : boolean; safecall; TJSMouseWheelEventHandler = reference to function(aEvent : TJSWheelEvent) : boolean; safecall;