android连接db2,[转载]XE5 Android 开发数据访问server端(二)

上一篇我们创建了一个拟给手机端访问的webservices服务

接下来创建一个返回数据集的过程,用webservices发布,供手机端调用。这里我使用firedac

1、打开上一篇自动创建的WebModule

然后分别拖放以下数据连接控件

FDConnection1:firedac连接数据库的

FDPhysMSSQLDriverLink1: 数据驱动 选的是sqlserver ,另外还有 db2 ,oracle,acess

,excel ,sqllite,mysql等

FDQuery1: 相当于adoquery

DataSetProvider1:delphi的provider

ClientDataSet1: delphi的我最喜欢的cds

2、数据库的连接

首先用  FDConnection1 连接sqlserver服务器,在控件上右键

设置以下信息

a4c26d1e5885305701be709a3d33442f.png

3、其他数据控件连接

FDquery1已经自动连上了connection,我们在sql里写以下语句

a4c26d1e5885305701be709a3d33442f.png

接下来 DataSetProvider1 连好fdquery1,clientdataset1的providername选择

DataSetProvider1

4、在WebModule 中的public中实现以下代码

function TAndroidWM.GetEmployee_Mi:

widestring;

begin

with clientdataset1 do

begin

close;

open;

result:=xmldata;

close;

end;

end;

5、在AdroidServicesImpl.pas 引用WebModule

的接口实现的public单元实现以下代码

function GetEmployee_mi:widestring;stdcall;

function TAdroidServices.GetEmployee_mi: string;

var

dm:TAndroidWM;

begin

dm:=TAndroidWM.Create(nil);

result:=dm.GetEmployee_Mi;

dm.Free;

end;

6、在 AdroidServicesIntf.pas 单元实现以下代码

type

IAdroidServices = interface(IInvokable)

['{9B1596C5-AD43-4849-830E-0B82D8BAA043}']

function

GetEmployee_mi:widestring;stdcall;

end;

6、运行server 查看webservice是否实现了GetEmployee_mi服务

a4c26d1e5885305701be709a3d33442f.png

服务端至此完成,实现了用clientdataset的xmldata返回数据集的过程,当然您可以对返回的xml进行压缩和解压缩的操作,减小网络传输压力。

下一篇 我们介绍在android手机端实现

调用webservices服务接口,完成数据展现

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值