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

Timestamp:

Jan 17, 2025, 9:05:54 PM (4 days ago)

Author:

chronos

Message:

• Modified: Updated Common package.
• Modified: Remove U prefix from unit names.
• Modified: Use Gneeric.Collections instead of fgl.
• Modified: Do not use global form variables.

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, 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, FormKeyShortcuts, ItemList, FormItem, FormList, 
+  LazarusPackageIntf;
 
 implementation
@@ -20 +21 @@
 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;