Delphi 调用webservice简单例子

1、打开delphi,File->New->Other->选webservice->WSDL importer 如下所示

2、点【ok】,弹出输入WSDL 的URL地址框，输入WSDL地址，然后【Next】

3、点【Next】之后，Delphi将自动生成WebInterface.pas单元

4、接下来我们测试这个WS 

5、使用

RIO.HTTPWebNode.UseUTF8InHeader := true; //解决乱码问题 

6、Delphi6 Delphi7 调用 C#的Webservice 不能传入参数

在Delphi导入WSDL后生成的单元的最后一行，即initialization里的初始化端口的代码中加入代码 
InvRegistry.RegisterInvokeOptions(TypeInfo(接口名), ioDocument);

即可

要加在

InvRegistry.RegisterInterface(TypeInfo(接口名),'http://XXX.com', 'UTF-8');

InvRegistry.RegisterDefaultSOAPAction(TypeInfo(接口名));

InvRegistry.RegisterInvokeOptions(TypeInfo(接口名), ioDocument);//这个位置