Web服务在Windows上工作,而不是在Android上工作

时间:2016-06-09 09:36:18

标签: delphi delphi-xe7

我实现了这个简单的webservice示例: Creating and Consuming Soap Services in Delphi.我在示例中添加了一个多设备应用程序。 它在Windows平台上运行良好,它在三星S6边缘浏览器上运行良好。 但它崩溃执行Android应用程序。

这是服务器端代码:

TMyService = class(TInvokableClass, IMyService)
  public
    function HelloWorld : String; stdcall;
end;
...
function TMyService.HelloWorld: String;
begin
  Result := 'HelloWorld';
end;

这是客户端代码

procedure TForm3.Button5Click(Sender: TObject);
var
  Service: IMyService;
begin
  // capture interface to service
  Service := unitIMyService.GetIMyService();
  edit1.Text := Service.HelloWorld;  // It crashes here
  ...
end;

是否有任何错误,或者我在android方面遗漏了什么?

0 个答案:

没有答案