瀏覽代碼

demo: fixed compile demoload

mattias 6 年之前
父節點
當前提交
4066cecd67
共有 1 個文件被更改,包括 3 次插入1 次删除
  1. 3 1
      demo/fcldb/demoload.lpr

+ 3 - 1
demo/fcldb/demoload.lpr

@@ -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;