paweld/pas2js
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/pas2js.git synced 2025-08-31 10:20:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

demo: descend Pascal class from JS function

Browse Source
This commit is contained in:
mattias 2020-06-28 16:32:47 +00:00
parent 271f20ea13
commit 65bc20baef
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
demo/extend_jsclass/ExtendJSFunctionClass1.lpr
View File

@ -1,14 +1,17 @@
{ Demo showing how to create a Pascal class descendant from a JS function.
}
program ExtendJSFunctionClass1;
{$mode objfpc}
{$ModeSwitch externalclass}
uses
JS, Classes, SysUtils, Web;
JS, browserconsole;
type
{ TJSPerson - a JS function, which is used like a class }
{ TJSPerson - a JS function, which is used like a class
Person is declared in the html }
TJSPerson = class external name 'Person'(TJSFunction)
public