IdHTTPServer(indy10)开发REST中间件
来源:互联网 发布:淘宝欢乐逛 编辑:程序博客网 时间:2024/06/05 07:36
IdHTTPServer(indy10)开发REST中间件
浏览器通过“get”方式查询数据URL样例:http://127.0.0.1:7777/query?sql=select * from t1
/query 表示是“查询”命令字
?后面是SQL参数
服务端代码:
procedure TForm1.IdHTTPServer1CommandGet(AContext: TIdContext; ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
var
method, sql: string;
{$IFDEF ado}
dm: TfrmDMado;
{$ENDIF}
{$IFDEF odac}
dm: TfrmDModac;
{$ENDIF}
begin
method := ARequestInfo.Document; // 获取命令字
if method = '' then
Exit;
{$ifdef ado}
CoInitialize(nil);
{$endif}
try
if method = '/query' then // 查询数据
begin
sql := ARequestInfo.Params.Values['sql']; // 取SQL参数
if sql = '' then
Exit;
AResponseInfo.ResponseNo := 0;
AResponseInfo.ContentType := 'text/html';
{$IFDEF ado}
dm := TfrmDMado.Create(nil);
{$ENDIF}
{$IFDEF odac}
dm := TfrmDModac.Create(nil);
{$ENDIF}
try
AResponseInfo.ContentText := dm.Query(sql); // 返回数据引擎查询到的JSON格式的数据
AResponseInfo.WriteContent; // 给申请者回复
finally
dm.Free;
end;
end;
except
on E: Exception do
begin
end;
end;
{$ifdef ado}
CoUninitialize;
{$endif}
end;
- IdHTTPServer(indy10)开发REST中间件
- idhttpserver用法
- 引用 在Delphi 2007 中用Indy10开发Socket应用程序
- 数据库开发中间件
- Android中间件开发----helloworld
- android 中间件开发
- nodejs开发中间件morgan
- 消息中间件应用开发
- IdHTTPServer使用注意问题
- IdHttpServer实现webservice
- DATASNAP REST WEBSERVICES中间件如何跨平台使用
- REST开发框架纵览
- REST开发框架纵览
- rest设计开发方式
- Rest Web Application开发
- REST服务开发实战
- 开发REST Web Service
- REST服务开发实战
- 数据结构c语言链队
- 第一周:53.Maximum Subarray(最大子串和问题)
- [IOS笔记]图片缩放-只在真机上有效
- 面试10大算法汇总+常见题目解答(Java)
- 【机器学习】Andrew Ng——05Octave
- IdHTTPServer(indy10)开发REST中间件
- Class.getResourceAsStreame 类文件读取配置文件信息
- 1029. 旧键盘(20)
- K Inverse Pairs Array (leetcode)
- YTU.2690: 用双重循环实现小九九
- 九度 题目1012:畅通工程
- apache url重写 出现The requested URL was not found on this server的问题index.php路径加上index.php就正常的问题
- 常见的浏览器端的存储技术
- An internal error occurred during: "Launching House on Tomcat 7.x". java.lang.NullPointerException