OSDN Git Service

いい具合になっています
[newbbs/newbbs.git] / Project3.dpr
1 program Project3;
2 {$APPTYPE GUI}
3
4 uses
5   Vcl.Forms,
6   Web.WebReq,
7   IdHTTPWebBrokerBridge,
8   FormUnit1 in 'FormUnit1.pas' {Form1},
9   WebModuleUnit1 in 'WebModuleUnit1.pas' {TWebModule1: TWebModule},
10   Unit1 in 'Unit1.pas' {DataModule1: TDataModule};
11
12 {$R *.res}
13
14 begin
15   if WebRequestHandler <> nil then
16     WebRequestHandler.WebModuleClass := WebModuleClass;
17   Application.Initialize;
18   Application.CreateForm(TForm1, Form1);
19   Application.CreateForm(TDataModule1, DataModule1);
20   Application.Run;
21 end.