Changeset 61 for trunk/Packages/Kernel/Kernel.Screen.pas

Timestamp:

Apr 7, 2024, 11:50:48 PM (6 weeks ago)

Author:

chronos

Message:

• Modified: Kernel API class definition improvement.

File:

• trunk/Packages/Kernel/Kernel.Screen.pas (modified) (3 diffs)

trunk/Packages/Kernel/Kernel.Screen.pas

@@ -4 +4 @@
 
 uses
-  SysUtils, Math, Kernel.Graphics;
+  SysUtils, Math, Kernel.Graphics, Kernel.Device;
 
 type
@@ -31 +31 @@
     function GetVideoMemory: PByte;
   public
-    Device: TObject; // TDeviceVideo;
+    Device: TDeviceVideo;
     Size: TPoint;
     DPI: Integer;
@@ -44 +44 @@
 
 implementation
-
-uses
-  Kernel.Device;
 
 { TScreenCanvas }