摘要：
具体分析一下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) 编辑
摘要：
又花时间试了试FireDAC,本想找到一些办法，让FireDAC取数据能和DBX样快，最终还是失败了，DBX实现是太快了，3472第记录（110个字段的表），0毫秒就抓过来了， FireDAC最快也要将近20毫秒。不过FireDAC已经把数据抓到TFDDatSTable中，知道记录条数了，（比DBX 阅读全文
posted @ 2015-06-09 00:05 jjw 阅读(2127) 评论(1) 推荐(0) 编辑
摘要：
procedure TForm1.Button1Click(Sender: TObject); var FCommIntf: IFDPhysCommand; //FireDAC.Phys.Intf FTab: TFDDatSTable; //FireDAC.DatS begin FTab := TF 阅读全文
posted @ 2015-06-07 11:19 jjw 阅读(1033) 评论(0) 推荐(0) 编辑
摘要：
1 class TMyProc : public TCppInterfacedObject 2 { 3 private: 4 String p1; 5 String p2; 6 public: 7 TMyProc(St... 阅读全文
posted @ 2015-02-19 01:47 jjw 阅读(521) 评论(0) 推荐(0) 编辑