Changeset 220 for trunk/Core.pas

Timestamp:

Jan 17, 2025, 9:39:06 PM (4 days ago)

Author:

chronos

Message:

• Added: Key shortcuts form.
• Added: Action to switch to fullscreen mode.

File:

• trunk/Core.pas (modified) (3 diffs)

trunk/Core.pas

@@ -16 +16 @@
     ThemeManager: TThemeManager;
     Translator: TTranslator;
-    ImageList1: TImageList;
+    ImageListSmall: TImageList;
     ImageListLarge: TImageList;
     JobProgressView1: TJobProgressView;
@@ -209 +209 @@
     end;
 
-    //ImageList1.Assign(ImageListLarge);
+    //ImageListSmall.Assign(ImageListLarge);
 
     ScaleDPI;
@@ -269 +269 @@
   //Core.ScaleDPI1.DPI := Point(200, 200);
   //{$IFDEF WINDOWS}
-  Core.ScaleDPI1.ScaleImageList(ImageList1, Core.ScaleDPI1.DesignDPI);
+  Core.ScaleDPI1.ScaleImageList(ImageListSmall, Core.ScaleDPI1.DesignDPI);
   //{$ENDIF}
 end;