Delphi实现WebService带身份认证的数据传输

在WebService中，用户身份认证信息可以在客户端通过soap头(soapheader)进行传送。在WebService服务端的编写中，需要对soap头进行处理，这个处理过程就是提取SoapHeader中的用户认证信息进行验证。下面就来看看在Delphi中这个身份认证是如何实现的:

   通过WSDLimport引入WEBSERVICE，DELPHI会自动产生自定义的Header类，这个类继承于TSoapHeader。

ShuSoapHeader = class(TSOAPHeader)
  private
    FNMsg:WideString;
    FUserID:WideString;
    FPassWord:WideString;
  published
    propertyNMsg: WideString read FNMsg write FNMsg;
    propertyUserID: WideString read FUserID write FUserID;
    propertyPassWord: WideString read FPassWord write FPassWord;
  end;

同时自动产生引用接口：

 InvRegistry.RegisterInterface(TypeInfo(SLoginServicesSoap),'http://passport.shu.edu.cn/', 'utf-8');
 InvRegistry.RegisterDefaultSOAPAct