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

TJSElement.scroll and .scrollBy

Browse Source
This commit is contained in:
Ondrej Pokorny 2024-12-11 14:45:08 +01:00
parent e7e9f1c359
commit e852fabe71
1 changed files with 12 additions and 0 deletions

12
packages/rtl/src/web.pas
View File

@ -383,6 +383,12 @@ Type
{$ENDIF}
end;
TJSScrollOptions = class external name 'Object' (TJSObject)
top : Integer;
left : Integer;
behaviour : string;
end;
TJSClientRectArray = array of TJSClientRect;
TJSElement = class external name 'Element' (TJSNode)
@ -448,6 +454,12 @@ Type
procedure replaceChildren(aNode : TJSNode); overload;
procedure replaceChildren(aNode1,aNode2 : TJSNode); overload;
procedure replaceChildren(aNode1,aNode2,aNode3 : TJSNode); overload; varargs;
procedure scroll(xCoord, yCoord: Integer); overload;
procedure scroll(options: TJSObject); overload;
procedure scroll(options: TJSScrollOptions); overload;
procedure scrollBy(xCoord, yCoord: Integer); overload;
procedure scrollBy(options: TJSObject); overload;
procedure scrollBy(options: TJSScrollOptions); overload;
procedure setAttribute(aName : string; AValue : String);
function setAttributeNode(aNode: TJSAttr) : TJSAttr;
function setAttributeNodeNS(aNode: TJSAttr) : TJSAttr;