newbbs.dpr

   1 program newbbs;
   2 {$APPTYPE GUI}
   3
   4
   5
   6
   7
   8 {$R *.dres}
   9
  10 uses
  11   Vcl.Forms,
  12   Web.WebReq,
  13   IdHTTPWebBrokerBridge,
  14   FormUnit1 in 'FormUnit1.pas' {Form1},
  15   WebModuleUnit1 in 'WebModuleUnit1.pas' {WebModule1: TWebModule};
  16
  17 {$R *.res}
  18
  19 begin
  20   if WebRequestHandler <> nil then
  21     WebRequestHandler.WebModuleClass := WebModuleClass;
  22   Application.Initialize;
  23   Application.CreateForm(TForm1, Form1);
  24   Application.Run;
  25 end.