delphi 如何调用webservice

Question

有webservice一接口，http://10.10.107.1:8080/sevice下一函数名为getxx,参数为t1,t2,请问如何得到返回值？

Answer 1

菜单栏  File >>> New >>> Other >>> WebServices >>> WSDL Importer >>> 输入你的网址 >>> Next >>> Finish
然后会出现一个新的Webservices单元，一般我遇到的都会提供一个类。function GetQueryInfByPnoPortType(UseWSDL: Boolean=System.False; Addr: string=''; HTTPRIO: THTTPRIO = nil): QueryInfByPnoPortType;比如我这个WebService，提供了这个接口。然后在需要调用的地方定义下
var
webser:QueryInfByPnoPortType  
begin
  webser:=GetQueryInfByPnoPortType(false, '');//这里类就创建好了。。比如我的webservices提供了一个函数 function  cwbbistrue(const in0: WideString; const in1: WideString): Boolean; stdcall;我这里就可以直接调用了   if not webstr.cwbbistrue(Edit1.Text, 'XXX') then