瀏覽代碼

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

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

michael 4 年之前
父節點
當前提交
19213ac89b
共有 1 個文件被更改,包括 1 次插入1 次删除
  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 }
   TJSDOMHighResTimeStamp = Double;
-  TFrameRequestCallback = procedure (aTime: TJSDOMHighResTimeStamp);
+  TFrameRequestCallback = reference to procedure (aTime: TJSDOMHighResTimeStamp);
 
   TJSPostMessageOptions = class external name 'Object' (TJSObject)
     targetOrigin : string;