Changeset 149 for trunk/Packages/Common/CommonPackage.pas

Timestamp:

Feb 4, 2024, 2:14:37 PM (9 months ago)

Author:

chronos

Message:

• Modified: Update Common package.
• Added: Project group.
• Modified: Assign ModuleUser to modules which use it in later time.

File:

• trunk/Packages/Common/CommonPackage.pas (copied) (copied from trunk/Packages/Common/Common.pas ) (3 diffs)

trunk/Packages/Common/CommonPackage.pas

@@ -3 +3 @@
  }
 
-unit Common;
+unit CommonPackage;
 
 {$warn 5023 off : no warning about unused units}
@@ -9 +9 @@
 
 uses
-  StopWatch, UCommon, UDebugLog, UDelay, UPrefixMultiplier, UURI, UThreading, 
-  UMemory, UResetableThread, UPool, ULastOpenedList, URegistry, 
-  UJobProgressView, UXMLUtils, UApplicationInfo, USyncCounter, UListViewSort, 
-  UPersistentForm, UFindFile, UScaleDPI, UTheme, UStringTable, UMetaCanvas, 
-  UGeometric, UTranslator, ULanguages, UFormAbout, UAboutDialog, 
-  UPixelPointer, UDataFile, UTestCase, UGenerics, LazarusPackageIntf;
+  StopWatch, Common, DebugLog, Common.Delay, PrefixMultiplier, URI, Threading, 
+  Memory, ResetableThread, Pool, LastOpenedList, RegistryEx, JobProgressView, 
+  XML, ApplicationInfo, SyncCounter, ListViewSort, PersistentForm, FindFile, 
+  ScaleDPI, Theme, StringTable, MetaCanvas, Geometric, Translator, Languages, 
+  PixelPointer, DataFile, TestCase, Generics, Table, FormEx, FormTests, 
+  FormTest, FormAbout, LazarusPackageIntf;
 
 implementation
@@ -20 +20 @@
 procedure Register;
 begin
-  RegisterUnit('UDebugLog', @UDebugLog.Register);
-  RegisterUnit('UPrefixMultiplier', @UPrefixMultiplier.Register);
-  RegisterUnit('ULastOpenedList', @ULastOpenedList.Register);
-  RegisterUnit('UJobProgressView', @UJobProgressView.Register);
-  RegisterUnit('UApplicationInfo', @UApplicationInfo.Register);
-  RegisterUnit('UListViewSort', @UListViewSort.Register);
-  RegisterUnit('UPersistentForm', @UPersistentForm.Register);
-  RegisterUnit('UFindFile', @UFindFile.Register);
-  RegisterUnit('UScaleDPI', @UScaleDPI.Register);
-  RegisterUnit('UTheme', @UTheme.Register);
-  RegisterUnit('UTranslator', @UTranslator.Register);
-  RegisterUnit('UAboutDialog', @UAboutDialog.Register);
+  RegisterUnit('DebugLog', @DebugLog.Register);
+  RegisterUnit('PrefixMultiplier', @PrefixMultiplier.Register);
+  RegisterUnit('LastOpenedList', @LastOpenedList.Register);
+  RegisterUnit('JobProgressView', @JobProgressView.Register);
+  RegisterUnit('ApplicationInfo', @ApplicationInfo.Register);
+  RegisterUnit('ListViewSort', @ListViewSort.Register);
+  RegisterUnit('PersistentForm', @PersistentForm.Register);
+  RegisterUnit('FindFile', @FindFile.Register);
+  RegisterUnit('ScaleDPI', @ScaleDPI.Register);
+  RegisterUnit('Theme', @Theme.Register);
+  RegisterUnit('Translator', @Translator.Register);
+  RegisterUnit('FormEx', @FormEx.Register);
 end;
 
 initialization
   RegisterPackage('Common', @Register);
-
 end.