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

* Patch from Henrique Werlang to implement TJSCSSStyleDeclaration

Browse Source
This commit is contained in:
michael 2021-02-10 11:55:12 +00:00
parent 2647578515
commit 0e621afe8b
1 changed files with 10 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
packages/rtl/web.pas
View File

@ -345,6 +345,8 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property origin : string read FOrigin;
end;
TJSCSSStyleDeclaration = class; // forward
TJSStyleSheet = class external name 'StyleSheet' (TJSEventTarget)
Private
FHRef : String; external name 'href';
@ -361,7 +363,6 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property _type : String read FType;
end;
TJSCSSRule = class external name 'CSSRule' (TJSObject)
Private
FCSSText : String; external name 'cssText';
@ -372,6 +373,14 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property parentRule : TJSCSSRule read FparentRule;
property parentStyleSheet : TJSCSSStyleSheet Read FParentStyleSheet;
end;
TJSCSSStyleRule = class external name 'CSSStyleRule' (TJSCSSRule)
private
FStyle: TJSCSSStyleDeclaration; external name 'style';
public
selectorText: String;
property style: TJSCSSStyleDeclaration read FStyle;
end;
TJSCSSRuleList = Class external name 'CSSRuleList' (TJSObject)
Private
@ -1900,8 +1909,6 @@ TEventListenerEvent = class external name 'EventListener_Event' (TJSObject)
property SearchParams : TJSURLSearchParams read FSearchParams;
end;
TJSCSSStyleDeclaration = class; // forward
TJSTimerCallBack = reference to procedure; safecall;
Theader = Array [0..1] of String;
THeaderArray = Array of Theader;