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

demo: fixed compile demoload

Browse Source
This commit is contained in:
mattias 2018-11-02 22:18:31 +00:00
parent e3c64cec62
commit 4066cecd67
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
demo/fcldb/demoload.lpr
View File

@ -151,10 +151,12 @@ begin
document.body.appendChild(panel); document.body.appendChild(panel);
Panel.appendChild(PanelContent); Panel.appendChild(PanelContent);
PanelContent.appendChild(Button); PanelContent.appendChild(Button);
DS:=TRestDataset.Create(Nil);
Conn:=TRestConnection.Create(nil); Conn:=TRestConnection.Create(nil);
Conn.BaseURL:='countries.json'; Conn.BaseURL:='countries.json';
Conn.OnGetURL:=@DoGetURL; Conn.OnGetURL:=@DoGetURL;
DS:=TRestDataset.Create(Nil);
DS.Connection:=Conn; DS.Connection:=Conn;
DS.OnLoadFail:=@DoLoadFail; DS.OnLoadFail:=@DoLoadFail;
DS.AfterLoad:=@DoAfterLoad; DS.AfterLoad:=@DoAfterLoad;