2019-07-27 20:23:48 +02:00
|
|
|
program SwaggerDocApi;
|
|
|
|
|
{$APPTYPE GUI}
|
|
|
|
|
|
|
|
|
|
uses
|
|
|
|
|
Vcl.Forms,
|
|
|
|
|
Web.WebReq,
|
|
|
|
|
IdHTTPWebBrokerBridge,
|
2019-10-09 23:44:44 +02:00
|
|
|
MainFormU in 'MainFormU.pas' {MainForm},
|
2019-07-27 20:23:48 +02:00
|
|
|
WebModuleMainU in 'WebModuleMainU.pas' {WebModule1: TWebModule},
|
|
|
|
|
MyController1U in 'MyController1U.pas',
|
|
|
|
|
MyController2U in 'MyController2U.pas',
|
|
|
|
|
MVCFramework.Middleware.Swagger in '..\..\sources\MVCFramework.Middleware.Swagger.pas',
|
2019-07-31 13:40:11 +02:00
|
|
|
MVCFramework.Swagger.Commons in '..\..\sources\MVCFramework.Swagger.Commons.pas',
|
|
|
|
|
AuthHandler in 'AuthHandler.pas';
|
2019-07-27 20:23:48 +02:00
|
|
|
|
|
|
|
|
{$R *.res}
|
|
|
|
|
|
|
|
|
|
begin
|
|
|
|
|
if WebRequestHandler <> nil then
|
|
|
|
|
WebRequestHandler.WebModuleClass := WebModuleClass;
|
|
|
|
|
Application.Initialize;
|
2019-10-09 23:44:44 +02:00
|
|
|
Application.CreateForm(TMainForm, MainForm);
|
2019-07-27 20:23:48 +02:00
|
|
|
Application.Run;
|
|
|
|
|
end.
|
