paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-05 11:17:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Namespaced OpenTok API

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-11-27 23:54:30 +01:00
parent 3c8da6f10c
commit 1e4a6845b9
2 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
packages/opentok/namespaced/Api.OpenTok.pas Normal file
View File

@ -0,0 +1,3 @@
{$DEFINE FPC_DOTTEDUNITS}
unit Api.OpenTok;
{$include ../src/libopentok.pas}

7
packages/opentok/libopentok.pas → packages/opentok/src/libopentok.pas
View File

@ -14,8 +14,9 @@
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
**********************************************************************}
{$IFNDEF FPC_DOTTEDUNITS}
unit libopentok;
{$ENDIF}
{$mode objfpc}
{$modeswitch externalclass}
@ -23,7 +24,11 @@ unit libopentok;
interface
uses
{$IFNDEF FPC_DOTTEDUNITS}
JSApi.JS, BrowserApi.Web, System.Types;
{$ELSE}
JS, web, types;
{$ENDIF}
Type
TJSMediaStreamTrack = class external name 'MediaStreamTrack' (TJSObject);