向大家请教Delphi如何调用java webservice的过程，越详细越好，不胜感激！

[tklyc]

不胜感激

[jadeluo]

选择Delphi菜单中的：File -> New -> Other -> WebServices -> WSDL Import， 输入WebService的WDSL的URL(例如新浪短信的WDSL地址为http://smsinter.sina.com.cn/ws/smswebservice0101.wsdl)，这样Delphi就会自动生成相应的接口单元(比如unit smswebservice0101)，该接口单元中有相应的接口类(比如SMSWebServiceSoapPort)。

在程序其他单元中引用这个生成的单元，然后申明一个接口类的实例，就能通过该实例调用WebService的功能了。

implementation

{$R *.dfm}

uses smswebservice0101;

procedure TForm1.Button1Click(Sender: TObject);
var
  A: SMSWebServiceSoapPort;
begin
  A.sendXml(......);
end;