paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-04-07 08:47:49 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Complete URL and add URLSearchParams object

Browse Source
This commit is contained in:
michael 2020-07-02 08:54:05 +00:00
parent 65bc20baef
commit 9578fd2459
1 changed files with 38 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

39
packages/rtl/web.pas
View File

@ -1847,9 +1847,46 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
TJSBlob = class;
TJSParamEnumCallBack = reference to procedure (const aKey,aValue : string);
TJSURLSearchParams = class external name 'URLSearchParams' (TJSObject)
Public
Procedure append(const aName,aValue : string);
Procedure delete(const aName : string);
Function entries : TJSIterator;
Procedure foreach(aEnumCallBack : TJSParamEnumCallBack);
function get(const aName : string) : JSValue;
// If you're sure the value exists...
function getString(const aName : string) : string; external name 'get';
function getAll(const aName : string) : TStringDynArray;
function has(const aName : string) : Boolean;
Function keys : TJSIterator; reintroduce;
Procedure set_(const aName,aValue : string); external name 'set';
Procedure sort;
Function values : TJSIterator; reintroduce;
end;
TJSURL = class external name 'URL' (TJSObject)
Private
FOrigin : String; external name 'origin';
FSearchParams : TJSURLSearchParams; external name 'searchParams';
public
class function createObjectURL(const v: JSValue): string; overload;
hash : string;
host : string;
hostname : string;
href : string;
password : string;
pathname : string;
port : string;
protocol : string;
search : string;
username : string;
constructor new(aURL : String);
constructor new(aURL,aBase : String);
class function createObjectURL(const v: JSValue): string;
class function revokeObjectURL(const S : String): string;
function toJSON : String;
Property Origin : String Read FOrigin;
property SearchParams : TJSURLSearchParams read FSearchParams;
end;
TJSCSSStyleDeclaration = class; // forward