home *** CD-ROM | disk | FTP | other *** search
/ Delphi Anthology / aDELPHI.iso / Runimage / Delphi50 / Demos / Webserv / iserver.dpr < prev    next >
Text File  |  1999-08-11  |  536b  |  25 lines

  1. { Compile this DLL and place it into your web server
  2.   scripts directory.  You can then access this application
  3.   from a web browser using http://<your web server>/scripts/iserver.dll
  4. }
  5. library IServer;
  6.  
  7. uses
  8.   WebBroker,
  9.   HTTPApp,
  10.   ISAPIApp,
  11.   main in 'main.pas' {CustomerInfoModule: TDataModule};
  12.  
  13. {$R *.RES}
  14.  
  15. exports
  16.   GetExtensionVersion,
  17.   HttpExtensionProc,
  18.   TerminateExtension;
  19.  
  20. begin
  21.   Application.Initialize;
  22.   Application.CreateForm(TCustomerInfoModule, CustomerInfoModule);
  23.   Application.Run;
  24. end.
  25.