mormot数据库连接+查询+序列为JSON

uses SynDB,SynCommons, SynDBRemote, SynOleDB, SynDBMidasVCL, mORMotMidasVCL

procedure TForm1.FormCreate(Sender: TObject);
var
json: RawUTF8;
begin
DataBase := TOleDBMSSQLConnectionProperties.Create('127.0.0.1,8829', 'yndb', 'sa', 'sa');
// DBServer := TSQLDBServerHttpApi.Create(DataBase, 'jj', '6789', 'admin', 'admin', False, 8, nil, tmThreadPool);
qry:=TQuery.Create(DataBase.ThreadSafeConnection);
qry.Close;
qry.SQL.Clear;
qry.SQL.Add('select top 100 * from t2');
qry.Open;
json := qry.PreparedSQLDBStatement.FetchAllAsJSON(True);
qry.Free;
DataSource1.DataSet := JSONToClientDataSet(Self, json);
end;

最新文章

  1. 【WPF】wpf image控件加载网络图片不显示问题,
  2. android studio sdk 不能更新
  3. C#读取Appconfig中自定义的节点
  4. POJ 3273 Monthly Expense
  5. Tomcat7+Redis存储Session(转)
  6. case a.ass_term_unit when '01' then (case a.ass_profit_mode when '0' then round(sum(a.ass_amount*a.ass_annual_rate/365*365*a.ass_term/100) ,2) when '1' then round(sum(a.ass_amount*a.ass_annual_rate/
  7. Springboot中使用AOP统一处理Web请求日志
  8. 极客验证官方demo构建使用及代码分析
  9. 5-15 QQ帐户的申请与登陆 (25分) HASH
  10. Uva - 804 - Petri Net Simulation
  11. Floyd算法——计算图中任意两点之间的最短路径
  12. python基础知识6---文件处理
  13. 使用Python+turtle绘制同心圆
  14. c++学习day3(字符串_指针)
  15. [Python]list.append字典的时候,修改字典会导致list内容变化的问题
  16. 模板(Template)系统
  17. 插头DP模板
  18. 【Linux 线程】常用线程函数复习《二》
  19. centos7 + mysql5.7 tar包解压安装
  20. hdu-4678-sg

热门文章

  1. [object-c 2.0 程序设计]object-c review (一)
  2. SEH
  3. linux下su和su - 的区别
  4. Codeforces 270E Flawed Flow 网络流问题
  5. 【反演复习计划】【51nod1594】Gcd and Phi
  6. 判断re模块的布尔值
  7. 【 Zabbix 】 — 基础安装
  8. 【C++】复制构造函数
  9. k8s的Health Check(健康检查)
  10. python multiprocessing多进程模块