Delphi/delphimvcframework
1
0
Fork 0
mirror of https://github.com/danieleteti/delphimvcframework.git synced 2024-11-15 15:55:54 +01:00
Code Issues Actions Packages Projects Releases Wiki Activity

IDEExpert: Added sample method with strongly typed actions

Browse Source
This commit is contained in:
danieleteti 2016-09-05 16:19:15 +02:00
parent d8abc1590a
commit 4d9f7ada28
3 changed files with 25 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
ideexpert/DMVC.Expert.CodeGen.Templates.pas
View File

@ -96,8 +96,8 @@ sLineBreak +
// 0 - Unit Name
// 1 - Class Name
// 2 - Index Method - Interface
// 3 - Index Method - Implementation
// 2 - Sample Methods - Interface
// 3 - Sample Methods - Implementation
// 4 - Action Filters - Interface
// 5 - Action Filters - Implementation
sControllerUnit = 'unit %0:s;' + sLineBreak +
@ -126,7 +126,11 @@ sLineBreak +
sIndexMethodIntf =
' [MVCPath(''/'')]' + sLineBreak +
' [MVCHTTPMethod([httpGET])]' + sLineBreak +
' procedure Index;' + sLineBreak;
' procedure Index;' + sLineBreak + sLineBreak +
' [MVCPath(''/hellos/($FirstName)'')]' + sLineBreak +
' [MVCHTTPMethod([httpGET])]' + sLineBreak +
' procedure GetSpecializedHello(const FirstName: String);' + sLineBreak;
// 0 - Class Name
sIndexMethodImpl =
@ -135,7 +139,12 @@ sLineBreak +
' //use Context property to access to the HTTP request and response ' + sLineBreak +
' Render(''Hello World'');' + sLineBreak +
sLineBreak +
'end;';
'end;' + sLineBreak + sLineBreak +
'procedure %0:s.GetSpecializedHello(const FirstName: String);' + sLineBreak +
'begin' + sLineBreak +
' Render(''Hello '' + FirstName);' + sLineBreak +
sLineBreak +
'end;' + sLineBreak;
sActionFiltersIntf =
' procedure OnBeforeAction(Context: TWebContext; const AActionName: string; var Handled: Boolean); override;' + sLineBreak +

2
ideexpert/DMVC.Expert.Forms.NewProjectWizard.dfm
View File

@ -65,7 +65,7 @@ object frmDMVCNewProject: TfrmDMVCNewProject
Width = 288
Height = 17
Anchors = [akLeft, akTop, akRight]
Caption = 'Create Index Method'
Caption = 'Create Index And Sample Methods'
Checked = True
State = cbChecked
TabOrder = 0

22
ideexpert/DMVC_IDE_Expert_D101Berlin.dproj
View File

@ -205,7 +205,16 @@
<Overwrite>true</Overwrite>
</Platform>
</DeployFile>
<DeployClass Name="ProjectiOSDeviceResourceRules"/>
<DeployClass Name="DependencyModule">
<Platform Name="Win32">
<Operation>0</Operation>
<Extensions>.dll;.bpl</Extensions>
</Platform>
<Platform Name="OSX32">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
</DeployClass>
<DeployClass Name="ProjectOSXResource">
<Platform Name="OSX32">
<RemoteDir>Contents\Resources</RemoteDir>
@ -517,16 +526,7 @@
<Operation>1</Operation>
</Platform>
</DeployClass>
<DeployClass Name="DependencyModule">
<Platform Name="Win32">
<Operation>0</Operation>
<Extensions>.dll;.bpl</Extensions>
</Platform>
<Platform Name="OSX32">
<Operation>1</Operation>
<Extensions>.dylib</Extensions>
</Platform>
</DeployClass>
<DeployClass Name="ProjectiOSDeviceResourceRules"/>
<ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>
<ProjectRoot Platform="iOSDevice64" Name="$(PROJECTNAME).app"/>
<ProjectRoot Platform="iOSDevice32" Name="$(PROJECTNAME).app"/>