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

* Add width & height to TJSImageBitmap

Browse Source
This commit is contained in:
Michael Van Canneyt 2025-03-03 17:48:27 +01:00
parent 12a9d92773
commit a8f6799748
1 changed files with 7 additions and 0 deletions

7
packages/rtl/src/weborworker.pas
View File

@ -1765,9 +1765,16 @@ type
end; end;
{ TJSImageBitmap }
TJSImageBitmap = class external name 'ImageBitmap' (TJSObject) TJSImageBitmap = class external name 'ImageBitmap' (TJSObject)
private
FHeight: cardinal; external name 'height';
FWidth: cardinal; external name 'width';
public public
procedure close(); procedure close();
property width : cardinal read FWidth;
property height : cardinal read FHeight;
end; end;
TJSOffscreenCanvasRenderingContext2D = class; TJSOffscreenCanvasRenderingContext2D = class;