Ver código fonte

* Merging revisions 1013 from trunk:
------------------------------------------------------------------------
r1013 | michael | 2020-12-14 11:58:17 +0100 (Mon, 14 Dec 2020) | 1 line

* Fix TFrameRequestCallback
------------------------------------------------------------------------

michael 4 anos atrás
pai
commit
19213ac89b
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      packages/rtl/web.pas

+ 1 - 1
packages/rtl/web.pas

@@ -1991,7 +1991,7 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
 
 
   { TJSWindow }
   { TJSWindow }
   TJSDOMHighResTimeStamp = Double;
   TJSDOMHighResTimeStamp = Double;
-  TFrameRequestCallback = procedure (aTime: TJSDOMHighResTimeStamp);
+  TFrameRequestCallback = reference to procedure (aTime: TJSDOMHighResTimeStamp);
 
 
   TJSPostMessageOptions = class external name 'Object' (TJSObject)
   TJSPostMessageOptions = class external name 'Object' (TJSObject)
     targetOrigin : string;
     targetOrigin : string;