mormot数据库连接+查询+序列为JSON
2024-10-15 10:50:30
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;
最新文章
- 【WPF】wpf image控件加载网络图片不显示问题,
- android studio sdk 不能更新
- C#读取Appconfig中自定义的节点
- POJ 3273 Monthly Expense
- Tomcat7+Redis存储Session(转)
- 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/
- Springboot中使用AOP统一处理Web请求日志
- 极客验证官方demo构建使用及代码分析
- 5-15 QQ帐户的申请与登陆 (25分) HASH
- Uva - 804 - Petri Net Simulation
- Floyd算法——计算图中任意两点之间的最短路径
- python基础知识6---文件处理
- 使用Python+turtle绘制同心圆
- c++学习day3(字符串_指针)
- [Python]list.append字典的时候,修改字典会导致list内容变化的问题
- 模板(Template)系统
- 插头DP模板
- 【Linux 线程】常用线程函数复习《二》
- centos7 + mysql5.7 tar包解压安装
- hdu-4678-sg