OSDN Git Service

めんどくさいからまとめた
[newbbs/newbbs.git] / Project3.dpr
1 program Project3;
2 {$APPTYPE GUI}
3
4
5
6 {$R *.dres}
7
8 uses
9   Vcl.Forms,
10   Web.WebReq,
11   IdHTTPWebBrokerBridge,
12   FormUnit1 in 'FormUnit1.pas' {Form1},
13   WebModuleUnit1 in 'WebModuleUnit1.pas' {TWebModule1: TWebModule},
14   Unit1 in 'Unit1.pas' {DataModule1: TDataModule};
15
16 {$R *.res}
17
18 begin
19   if WebRequestHandler <> nil then
20     WebRequestHandler.WebModuleClass := WebModuleClass;
21   Application.Initialize;
22   Application.CreateForm(TForm1, Form1);
23   Application.CreateForm(TDataModule1, DataModule1);
24   Application.Run;
25 end.