Changeset 463 for branches/highdpi/Packages/Common/CommonPackage.pas

Timestamp:

Nov 29, 2023, 2:35:44 PM (6 months ago)

Author:

chronos

Message:

• Modified: HighDpi branch updated to trunk version.

File:

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

branches/highdpi/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, 
-  UPersistentForm, UFindFile, UScaleDPI, UTheme, UStringTable, UGeometric, 
-  UTranslator, ULanguages, UFormAbout, UAboutDialog, UPixelPointer, 
+  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, 
+  FormAbout, AboutDialog, PixelPointer, DataFile, TestCase, Generics, 
   LazarusPackageIntf;
 
@@ -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('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('AboutDialog', @AboutDialog.Register);
 end;