pisapiwsdemo1.dpr

来自「Delphi开发webservice的一套例子」· DPR 代码 · 共 23 行

library PISAPIWSDemo1;

uses
  WebBroker,
  ISAPIThreadPool,
  ISAPIApp,
  uwmWSDemo1 in 'uwmWSDemo1.pas' {WebModule1: TWebModule},
  MyFirstWSImpl in 'MyFirstWSImpl.pas',
  MyFirstWSIntf in 'MyFirstWSIntf.pas';

{$R *.RES}

exports
  GetExtensionVersion,
  HttpExtensionProc,
  TerminateExtension;

begin
  Application.Initialize;
  Application.CreateForm(TWebModule1, WebModule1);
  Application.Run;
end.