急求！！webservice访问出错

想完成的功:delphi生成的exe文件访问webservice中方法，传递一个参数后，得到相应的值
我首先用file->new->other->webservices中的wsdl importer，然后根据wsdl自动生成mls_upgrade_ws.pas
其中需要的方法为 getFiles（s:string），返回string类型
然后建一个工程，加入控件HTTPRIO1：HTTPRIO，设置wsdllocation，port和service，然后调用getFiles方法传值、访问
然后问提出现了，当我在delphi环境下F9的时候，可以访问，没问题
但是单独点击生成的exe文件，就会报错
而且把exe文件拷贝到其他人的机器上，发现有的可以访问成功，有的则不行
代码如下
unit Unit1;interfaceuses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, InvokeRegistry, Rio, SOAPHTTPClient, mls_upgrade_ws;type
  TForm1 = class(TForm)
    mmo1: TMemo;
    btn1: TButton;
    HTTPRIO1: THTTPRIO;
    procedure btn1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  Form1: TForm1;
   xdbcs:mls_upgrade_wsPortType;
implementation{$R *.dfm}procedure TForm1.btn1Click(Sender: TObject);
var
  str:string;
begin
  try
  xdbcs := HTTPRIO1 as mls_upgrade_wsPortType;
  str := xdbcs.getFiles('cwwms_zs');
  mmo1.Lines.Add(str);
  finally
  xdbcs._Release;
  end;
end;end.问题很急，在线等