jjw

写给自己的博客。 记录学习的点滴以备查。
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2015年9月18日

摘要: 具体分析一下DataSanp App与Rest, WebBroker App的不同,先看TDSHTTPService。*******************************************************************************************... 阅读全文

posted @ 2015-09-18 15:00 jjw 阅读(633) 评论(0) 推荐(0) 编辑

摘要: 1 function TDSHTTPWebDispatcher.DispatchRequest(Sender: TObject; 2 Request: TWebRequest; Response: TWebResponse): Boolean; 3 begin 4 try 5 if... 阅读全文

posted @ 2015-09-18 13:19 jjw 阅读(542) 评论(0) 推荐(0) 编辑

摘要: 继续篇中的 1 function TCustomWebDispatcher.DispatchAction(Request: TWebRequest; 2 Response: TWebResponse): Boolean; 3 var 4 I: Integer; 5 Action, Def... 阅读全文

posted @ 2015-09-18 11:52 jjw 阅读(610) 评论(0) 推荐(0) 编辑

摘要: 第11行代码,先得到一个激活的WebModule,如何没有,就会创建一个再返回。 第14行到第26行代码,判断WebModule中是否实现了 IGetWebAppServices 接口的,具体做什么先略过。因为WebModule没有继承这个接口。 第27行,创建一个默认的WebAppServices 阅读全文

posted @ 2015-09-18 11:44 jjw 阅读(587) 评论(0) 推荐(0) 编辑

摘要: program Project1;{$APPTYPE GUI}{$R *.dres}uses Vcl.Forms, Web.WebReq, IdHTTPWebBrokerBridge, FormUnit1 in 'FormUnit1.pas' {Form1}, ServerMethodsU... 阅读全文

posted @ 2015-09-18 11:06 jjw 阅读(780) 评论(0) 推荐(0) 编辑

摘要: Delphi的DataSnap用了一段时间了,但一直感觉有些地方还不够了解,所以花时间阅读了源代码,特作此烂笔头。Datasnap是在之前的WebBorker基础上搭建的,DataSnap向导自动生成了基础的代码,所以就以基础代码为起点来看看DataSnap的内部机制。首选创建一个Stand-alo... 阅读全文

posted @ 2015-09-18 10:19 jjw 阅读(1376) 评论(0) 推荐(0) 编辑