Changeset 145 for trunk/Forms/FormLog.pas

Timestamp:

Jun 5, 2023, 6:44:57 PM (18 months ago)

Author:

chronos

Message:

• Modified: Remove U prefix from unit names.
• Modified: Updated Common package.

File:

• trunk/Forms/FormLog.pas (moved) (moved from trunk/Forms/UFormLog.pas ) (4 diffs)

trunk/Forms/FormLog.pas

@@ -1 @@
-unit UFormLog;
+unit FormLog;
 
 interface
@@ -13 +13 @@
     Memo1: TMemo;
     procedure FormCreate(Sender: TObject);
-  private
-    { private declarations }
-  public
-    { public declarations }
   end;
 
-var
-  FormLog: TFormLog;
 
 implementation
@@ -27 +21 @@
 
 uses
-  UCore;
+  Core;
 
 { TFormLog }
@@ -33 +27 @@
 procedure TFormLog.FormCreate(Sender: TObject);
 begin
-  Core.Translator.TranslateComponentRecursive(Self);
-  Core.ThemeManager.UseTheme(Self);
+  Core.Core.Translator.TranslateComponentRecursive(Self);
+  Core.Core.ThemeManager.UseTheme(Self);
 end;