不胜感激

解决方案 »

  1.   

    选择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;