Web服务器Delphi无法创建客户端

Question

我在Delphi中有一个带有以下功能的Web服务器。

function Twebserver.Login(AUserName, APassword: string) : Tcustomer;

和我的客户

var
  c := getISimpleCalculator.Login(AUserName, APassword);

  if c.custLogged = '1' then
  begin
  showmessage('olaaa11');
  end
   else
 begin
  messagedlg('Usuario ou senha incorreta', mterror, [mbok], 0);
   end;

当我尝试登录时出现此错误：

  

引发异常类ERemotableException
  地址访问违规....

为什么我无法登录？我在tedit 1和tedit2中传递了用户和密码。

Answer 1

在Web服务的服务器端抛出了ERemotebleException。如果远程方法调用的输入值正确，则在客户端没有太多可以做的事情。我建议使用传递给Login方法的参数调试服务器代码。