Changeset 23 for trunk/VCSCommander.lpr

Timestamp:

Apr 4, 2025, 9:22:05 AM (9 days ago)

Author:

chronos

Message:

• Modified: All unit renamed to names without U prefix.
• Modified: Removed global form variables.
• Modified: Code cleanup.

File:

• trunk/VCSCommander.lpr (modified) (3 diffs)

trunk/VCSCommander.lpr

@@ -1 +1 @@
 program VCSCommander;
-
-{$mode objfpc}{$H+}
 
 uses
@@ -8 +6 @@
   {$ENDIF}
   Interfaces, // this includes the LCL widgetset
-  Forms, UFormMain, UCore, Common, UFormBrowse, UVCS,
-  UFormFavorites, UFormSettings, UFormConsole, USubversion, UProject, SysUtils,
-  UFormCommit, UFormCheckout, UBazaar, UBackend, UFormLog, UFormTest,
-  UFormProjectGroup
+  Forms, FormMain, Core, Common, FormBrowse, VCS,
+  FormFavorites, FormSettings, FormConsole, Subversion, Project, SysUtils,
+  FormCommit, FormCheckout, Bazaar, Backend, FormLog, FormTest,
+  FormProjectGroup
   { you can add units after this };
 
@@ -31 +29 @@
   RequireDerivedFormResource := True;
   Application.Initialize;
-  Application.CreateForm(TCore, Core);
-  Application.CreateForm(TFormMain, FormMain);
-  Application.CreateForm(TFormBrowse, FormBrowse);
-  Application.CreateForm(TFormFavorites, FormFavorites);
-  Application.CreateForm(TFormSettings, FormSettings);
-  Application.CreateForm(TFormConsole, FormConsole);
-  Application.CreateForm(TFormCommit, FormCommit);
-  Application.CreateForm(TFormCheckout, FormCheckout);
-  Application.CreateForm(TFormLog, FormLog);
-  Application.CreateForm(TFormTest, FormTest);
-  Application.CreateForm(TFormProjectGroup, FormProjectGroup);
+  Application.CreateForm(TCore, Core.Core);
   Application.Run;
 end.