主页 > 编程资料 > Delphi >
发布时间:2015-09-22 作者:网络 阅读:161次

XE5对android的平台支持很有吸引力,虽然目前用来直接开发应用到安卓市场卖赚钱可能性估计不大(安卓市场目前国内好像都是免费的天下),但是对于企业应用很是很有帮助的,比如开发一个手机客户端随时查询企业erp等管理软件的数据库!
   webservice以前基本没有接触,恶补了几天,服务端用ro开发比较快捷(ro下载请自己baidu)

一,服务端开发:

     1,打开delphi xe(服务端我用的是xe开发的,因为目前还没有出支持xe5的ro)

      新建工程---RO sdk--vcl standalone--建立成功

     2,工程打开后,在ide的菜单ro中选择edit serverice library

     3,打开ServerForm,删除上面的2个控件,并添加TROIpHTTPServer(属性中可以设置端口), TROSOAPMessage 2个控件,设置TROIpHTTPServer的  dispatchers属性,绑定TROSOAPMessage

     4,默认已经添加了了哇library 和newservice,我们一切按默认,用的是默认的一个函数sum,2个数求和

     5,打开NewService_Impl,实现sum的具体代码:Result:=a+b;

      6,运行服务端

    打开浏览器测试:http://127.0.0.1:8099/soap

   8099是我步骤3中设置的端口号,应该可以看到xml文件,说明服务端成功

 

二、服务端开发

    1,打开xe5(为了测试android平台,客户端用xe5开发了)

    2,新建项目-选择fm 移动项目

    3,添加THTTPRIO控件

    4,导入wsdl---

        添加项目---web service --import wsdl

         弹出向导对话框

         这步遇到了问题

         填入我服务端开发的soap地址,点击下一步,最后弹出错误,原因不明

          解决方法,回到xe开发服务端的界面,打开ide菜单ro中选择edit serverice library

          选择view -wsdl-save as 操作保存 wsdl文件

      回到xe5中的导入wsdl文件对话框,改为直接选择上面的wsdl文件,成功得到soap_1.pas

   在unit1.pas中添加soap_1.pas引用

 

    5,在界面添加2个edit,1个lable,一个button

     添加button的clickdaima

    procedure TForm1.Button1Click(Sender: TObject);
    begin
      HTTPRIO1.URL:='http://192.168.1.103:8099/SOAP';
      Label1.Text:=IntToStr((HTTPRIO1 as NewService).Sum(StrToInt(Edit1.Text),strtoint(Edit2.Text)));
    end;

  6,发布至android平台测试(注意保证android平台与电脑的网络连通)

 

 

代码下载地址 http://pan.baidu.com/s/1mr09i


关键字词: