DelphiMVCFramework-3.4.2-magnesium

danieleteti · Feb 13, 2025 · dbe4379 · dbe4379
1 parent d315876
commit dbe4379
Show file tree

Hide file tree

Showing 4 changed files with 11 additions and 13 deletions.
diff --git a/ideexpert/DMVC.Expert.Forms.NewProjectWizard.dfm b/ideexpert/DMVC.Expert.Forms.NewProjectWizard.dfm
@@ -31,14 +31,14 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object lblWbModule: TLabel
     Left = 24
-    Top = 167
+    Top = 163
     Width = 114
     Height = 13
     Caption = 'WebModule Class Name'
   end
   object Label2: TLabel
     Left = 24
-    Top = 214
+    Top = 210
     Width = 55
     Height = 13
     Caption = 'Server Port'
@@ -492,14 +492,14 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object edtWebModuleName: TEdit
     Left = 24
-    Top = 186
+    Top = 182
     Width = 225
     Height = 21
     TabOrder = 1
   end
   object edtServerPort: TEdit
     Left = 24
-    Top = 233
+    Top = 229
     Width = 65
     Height = 21
     TabOrder = 2
@@ -751,7 +751,7 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object chkMSHeap: TCheckBox
     Left = 24
-    Top = 283
+    Top = 303
     Width = 225
     Height = 17
     Anchors = [akLeft, akRight, akBottom]
@@ -760,7 +760,7 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object chkCustomConfigDotEnv: TCheckBox
     Left = 24
-    Top = 264
+    Top = 325
     Width = 225
     Height = 17
     Anchors = [akLeft, akRight, akBottom]
@@ -769,7 +769,7 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object chkServicesContainer: TCheckBox
     Left = 24
-    Top = 303
+    Top = 259
     Width = 225
     Height = 17
     Anchors = [akLeft, akRight, akBottom]
@@ -780,13 +780,11 @@ object frmDMVCNewProject: TfrmDMVCNewProject
   end
   object chkSqids: TCheckBox
     Left = 24
-    Top = 323
+    Top = 281
     Width = 225
     Height = 17
     Anchors = [akLeft, akRight, akBottom]
     Caption = 'Use Sqids'
-    Checked = True
-    State = cbChecked
     TabOrder = 11
   end
   object rgNameCase: TRadioGroup

diff --git a/ideexpert/DMVC.Expert.Forms.NewProjectWizard.pas b/ideexpert/DMVC.Expert.Forms.NewProjectWizard.pas
@@ -280,7 +280,7 @@ procedure TfrmDMVCNewProject.rgSSVClick(Sender: TObject);
 {$if not Defined(WEBSTENCILS)}
   if SameText(rgSSV.Items[rgSSV.ItemIndex], 'webstencils') then
   begin
-    ShowMessage('This Delphi version doesn''t support WebStencils, so DMVCFramework cannot use it.' +
+    ShowMessage('This Delphi version doesn''t support WebStencils, so DelphiMVCFramework cannot use it.' +
       sLineBreak + 'Consider to use TemplatePro.');
     rgSSV.ItemIndex := 1;
   end;

diff --git a/ideexpert/DMVC.Expert.NewUnitWizardEx.pas b/ideexpert/DMVC.Expert.NewUnitWizardEx.pas
@@ -65,7 +65,7 @@ class procedure TDMVCNewUnitWizard.RegisterDMVCNewUnitWizard(const APersonality:
 begin
   RegisterPackageWizard(TExpertsRepositoryProjectWizardWithProc.Create(APersonality, sNewDMVCProjectHint,
     sNewDMVCUnitCaption, 'DMVC.Wizard.NewUnitWizard', // do not localize
-    'DMVCFramework', 'DMVCFramework Team - https://github.com/danieleteti/delphimvcframework', // do not localize
+    'DelphiMVCFramework', 'DelphiMVCFramework Team - https://github.com/danieleteti/delphimvcframework', // do not localize
     procedure
     var
       WizardForm: TfrmDMVCNewUnit;

diff --git a/ideexpert/DMVC.Expert.ProjectWizardEx.pas b/ideexpert/DMVC.Expert.ProjectWizardEx.pas
@@ -83,7 +83,7 @@ class procedure TDMVCNewProjectWizard.RegisterDMVCProjectWizard(const APersonali
 begin
   RegisterPackageWizard(TExpertsRepositoryProjectWizardWithProc.Create(APersonality, sNewDMVCProjectHint, sNewDMVCProjectCaption,
     'DMVC.Wizard.NewProjectWizard', // do not localize
-    'DMVCFramework', 'DMVCFramework Team - https://github.com/danieleteti/delphimvcframework', // do not localize
+    'DelphiMVCFramework', 'DelphiMVCFramework Team - https://github.com/danieleteti/delphimvcframework', // do not localize
     procedure
     var
       WizardForm: TfrmDMVCNewProject;