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

运行如下：

遗憾的是 ,乱码。。。

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