2
0
Эх сурвалжийг харах

* Add overloads for postMessage without Target (bug ID 36727)

michael 5 жил өмнө
parent
commit
6222bd535a
1 өөрчлөгдсөн 2 нэмэгдсэн , 1 устгасан
  1. 2 1
      packages/rtl/web.pas

+ 2 - 1
packages/rtl/web.pas

@@ -1676,7 +1676,6 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
     constructor new(aURL : string);
     procedure postMessage(aValue : JSValue);
     procedure postMessage(aValue : JSValue; aList : TJSValueDynArray);
-    procedure terminate;
   end;
 
   TJSMessagePort = class external name 'MessagePort' (TJSEventTarget)
@@ -2073,6 +2072,8 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
     function open(Const aURL : String) : TJSWindow; overload;
     function open(Const aURL,aTarget : String) : TJSWindow; overload;
     function open(Const aURL,aTarget : String; AOptions : TJSObject) : TJSWindow; overload;
+    procedure postMessage(aMessage : JSValue);
+    procedure postMessage(aMessage : JSValue; aTransfer : TJSValueDynArray);
     procedure postMessage(aMessage : JSValue; aTarget : string);
     procedure postMessage(aMessage : JSValue; aTarget : string; aTransfer : TJSValueDynArray);
     procedure print;