Changeset 25 for trunk/Packages/Common/Common.pas

Timestamp:

Sep 10, 2022, 6:54:43 PM (2 years ago)

Author:

chronos

Message:

• Modified: CoolTranslator replaced by Common package.
• Modified: Update common package.

File:

• trunk/Packages/Common/Common.pas (modified) (3 diffs)

trunk/Packages/Common/Common.pas

@@ -5 +5 @@
 unit Common;
 
+{$warn 5023 off : no warning about unused units}
 interface
 
 uses
-  StopWatch, UCommon, UDebugLog, UDelay, UPrefixMultiplier, UURI, UThreading,
-  UMemory, UResetableThread, UPool, ULastOpenedList, URegistry,
-  UJobProgressView, UXMLUtils, UApplicationInfo, USyncCounter, UListViewSort,
-  UPersistentForm, UFindFile, UScaleDPI, UTheme, LazarusPackageIntf;
+  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;
 
 implementation
@@ -18 +21 @@
 begin
   RegisterUnit('UDebugLog', @UDebugLog.Register);
+  RegisterUnit('UPrefixMultiplier', @UPrefixMultiplier.Register);
   RegisterUnit('ULastOpenedList', @ULastOpenedList.Register);
   RegisterUnit('UJobProgressView', @UJobProgressView.Register);
@@ -26 +30 @@
   RegisterUnit('UScaleDPI', @UScaleDPI.Register);
   RegisterUnit('UTheme', @UTheme.Register);
+  RegisterUnit('UTranslator', @UTranslator.Register);
+  RegisterUnit('UAboutDialog', @UAboutDialog.Register);
 end;