Browse Source

* Some small changes to TJSMediaQueryList

Michael Van Canneyt 1 tháng trước cách đây
mục cha
commit
fc7d37e6fb
1 tập tin đã thay đổi với 2 bổ sung1 xóa
  1. 2 1
      packages/rtl/src/web.pas

+ 2 - 1
packages/rtl/src/web.pas

@@ -1648,11 +1648,12 @@ Type
 
   { TJSMediaQueryList }
 
-  TJSMediaQueryList = class external name 'MediaQueryList' (TJSObject)
+  TJSMediaQueryList = class external name 'MediaQueryList' (TJSEventTarget)
   private
     FMatches: Boolean; external name 'matches';
     FMedia: String; external name 'media';
   Public
+    onchange : TJSRawEventHandler;
     Property matches : Boolean Read FMatches;
     Property media : String Read FMedia;
   end;