delphimvcframework/samples/swaggerdoc/SwaggerDocApi.dpr
2019-07-27 15:23:48 -03:00

24 lines
662 B
ObjectPascal

program SwaggerDocApi;
{$APPTYPE GUI}
uses
Vcl.Forms,
Web.WebReq,
IdHTTPWebBrokerBridge,
MainFormU in 'MainFormU.pas' {Form1},
WebModuleMainU in 'WebModuleMainU.pas' {WebModule1: TWebModule},
MyController1U in 'MyController1U.pas',
MyController2U in 'MyController2U.pas',
MVCFramework.Middleware.Swagger in '..\..\sources\MVCFramework.Middleware.Swagger.pas',
MVCFramework.Swagger.Commons in '..\..\sources\MVCFramework.Swagger.Commons.pas';
{$R *.res}
begin
if WebRequestHandler <> nil then
WebRequestHandler.WebModuleClass := WebModuleClass;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.