Browse Source

* Complete TJSMediaStreamTrack

Michael Van Canneyt 1 month ago
parent
commit
dee5d1a337
1 changed files with 23 additions and 4 deletions
  1. 23 4
      packages/rtl/src/web.pas

+ 23 - 4
packages/rtl/src/web.pas

@@ -1392,11 +1392,30 @@ Type
   end;
   end;
 
 
   TJSMediaStreamTrack = class external name 'MediaStreamTrack' (TJSEventTarget)
   TJSMediaStreamTrack = class external name 'MediaStreamTrack' (TJSEventTarget)
-       procedure stop;
-       function getCapabilities : TJSObject;
-       function getSettings : TJSObject;
+  private
+    FcontentHint : String; external name 'contentHint';
+    Fenabled : Boolean; external name 'enabled';
+    Fkind : String; external name 'kind';
+    Fid : String; external name 'id';
+    Flabel : String; external name 'label';
+    Fmuted : Boolean; external name 'muted';
+    FreadyState : String; external name 'readyState';
+  public
+    property contentHint : String read FcontentHint write FcontentHint;
+    property enabled : Boolean read Fenabled write Fenabled;
+    property id : String read Fid;
+    property kind : String read Fkind;
+    property label_ : String read Flabel;
+    property muted : Boolean read Fmuted;
+    property readyState : String read FreadyState;
+
+    function applyConstraints(constraints : TJSObject) : TJSPromise;
+    function clone : TJSMediaStreamTrack;
+    function getCapabilities : TJSObject;
+    function getConstraints : TJSObject;
+    function getSettings : TJSObject;
+    procedure stop;
   end;
   end;
-
   TJSMediaStreamTrackProc = reference to procedure (aMediaStreamTrack : TJSMediaStreamTrack);
   TJSMediaStreamTrackProc = reference to procedure (aMediaStreamTrack : TJSMediaStreamTrack);
 
 
   TJSMediaStreamTracks = class external name 'Array' (TJSArray)
   TJSMediaStreamTracks = class external name 'Array' (TJSArray)