Changeset 156 for trunk/Core.pas

Timestamp:

Aug 19, 2024, 8:35:07 AM (5 weeks ago)

Author:

chronos

Message:

• Modified: Automatically open example file on first start.

File:

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

trunk/Core.pas

@@ -267 +267 @@
     if (DesignDPI.X <> DPI.X) or (DesignDPI.Y <> DPI.Y) then begin
       //ApplyToAll(DesignDPI);
-{      for I := 0 to Screen.FormCount - 1 do
+      for I := 0 to Screen.FormCount - 1 do
       if (Screen.Forms[I].WindowState = wsNormal) or
         (Screen.Forms[I].WindowState = wsMinimized) then begin
@@ -273 +273 @@
         ScaleDimensions(Screen.Forms[I], StoredDimension);
       end;
- }     ScaleImageList(ImageListMain, DesignDPI);
+      ScaleImageList(ImageListMain, DesignDPI);
     end;
   end;