Delphi控件源码

开发平台：

Delphi

ServerWebModule.pas：源码内容

							unit serverwebmodule;
interface
uses
  SysUtils, Classes, HTTPApp, WSDLPub, SOAPPasInv, SOAPHTTPPasInv,
  SoapHTTPDisp, WebBrokerSOAP;
type
  TWebModule2 = class(TWebModule)
    HTTPSoapDispatcher1: THTTPSoapDispatcher;
    HTTPSoapPascalInvoker1: THTTPSoapPascalInvoker;
    WSDLHTMLPublish1: TWSDLHTMLPublish;
  private
    { Private declarations }
  public
    { Public declarations }
  end;
var
  WebModule2: TWebModule2;
implementation
uses WebReq;
{$R *.DFM}
initialization
  WebRequestHandler.WebModuleClass := TWebModule2;
end.

						