delphi xe5 android 开发数据访问手机端(二)

界面就这样吧，继续。。。，先启动咱们上几片文章建立的手机服务端



导入webservices单元，file->new->other->webservices->选择 wsdlimporter



输入wsdl地址 http://localhost:8080/wsdl/IAdroidServices



之后施展一路回车大法，只到生成一个单元文件保存并在手机窗体单元中引用。

在窗体上的按钮的click事件中实现以下代码：

procedure TForm1.button1Click(Sender: TObject);
var
ws:IAdroidServices;
s:string;
begin
ws:=GetIAdroidServices(true,'http://10.110.0.56:8080/wsdl/IAdroidServices',nil); //参数中可以使用配置的url
s:=ws.GetEmployee_mi;
if length(s)<>0 then
clientdataset1.xmldata:=s;
end;

可以在win32平台上先测试一下，如图：



win32平台上没问题 ok，接下来target选择我的 大平板手机 O(∩_∩)O~ ，p3100

运行如下：



遗憾的是 ,乱码。。。

乱码的问题等我搞定了上来分享！