Delphi通过WebService开发Web服务端和手机客户端.docx

文档介绍：介绍本文章介绍了DelphiXE5通过WebService开发Web服务端和手机客户端,下面是操作的详细过程。我们开发一个三层的android程序建立一个webservices  stand-alonevclapplication作为手机访问的服务端1、new->other->webservices2、选择stand-alonevclapplication3、这里使用默认端口80804、选择创建接口5、给服务起个名字6、点ok后保存工程,保存为目录如下:7、至此为止,什么代码都不写,点击运行,我们看到8、启动并点击openbrowser按钮在浏览器里看到一个web服务就创建完成了。接下来创建一个返回数据集的过程,用webservices发布,供手机端调用。这里我使用firedac1、打开上一篇自动创建的WebModule  然后分别拖放以下数据连接控件  FDConnection1:firedac连接数据库的  FDPhysMSSQLDriverLink1:数据驱动选的是sqlserver,另外还有db2,oracle,acess,excel,sqllite,mysql等  FDQuery1:相当于adoquery  DataSetProvider1:delphi的provider  ClientDataSet1:delphi的我最喜欢的cds2、数据库的连接    首先用  FDConnection1连接sqlserver服务器,在控件上邮件设置一下信息        3、其他数据控件连接      FDquery1已经自动连上了connection,我们在sql里写以下语句      接下来DataSetProvider1连好fdquery1,clientdataset1的providername选择DataSetProvider1  4、在WebModule中的public中实现以下代码 function:widestring; begin withclientdataset1do begin   close;   open;   result:=xmldata;   close; end; end;  5、引用WebModule的接口实现的public单元实现以下代码    functionGetEmployee_mi:widestring;stdcall;    function:string;   var   dm:TAndroidWM; begin   dm:=(nil);   result:=;   ; end;6、在单元实现以下代码type  IAdroidServices=interface(IInvokable)  ['{9B1596C5-AD43-4849-830E-0B82D8BAA043}']    functionGetEmployee_mi:widestring;stdcall;    end;  6、运行server查看webservice是否实现了GetEmployee_mi服务      服务端至此完成,实现了用clientdataset的xmldata返回数据集的过程,当然您可以对返回的xml进行压缩和解压缩的操作,减小网络传输压力。我们把供手机端调用的web服务完成,接下来实现手机端调用webservices获取数据1、新建firemonkeymobileapplication2、选择blankapplication  3、这里选择分辨率,我用的手机是三星的p3100,没别的优点就是大,7寸的屏,我女儿管这个叫平板手机  O(∩_∩)O~