paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-20 17:49:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Constructor

Browse Source
This commit is contained in:
Michaël Van Canneyt 2024-04-27 17:45:21 +02:00
parent 6a7524418a
commit c4165a67a7
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
packages/wasm-job/src/job.js.pas
View File

@ -322,6 +322,7 @@ type
constructor JOBCreate(Args : Array of const);
class function JSClassName : UnicodeString; virtual;
class function Cast(const Intf: IJSObject): IJSObject; overload;
constructor Create; virtual;
destructor Destroy; override;
property JOBObjectID: TJOBObjectID read FJOBObjectID;
property JOBObjectIDOwner: boolean read FJOBObjectIDOwner write FJOBObjectIDOwner;
@ -2962,7 +2963,11 @@ begin
Result:='Object';
end;
constructor TJSObject.Create;
begin
JOBCreate([]);
end;
destructor TJSObject.Destroy;
begin