Changeset 68 for branches/Independent/Os.pas

Timestamp:

Dec 17, 2024, 11:10:31 PM (4 days ago)

Author:

chronos

Message:

• Added: Mouse API support.

File:

• branches/Independent/Os.pas (modified) (4 diffs)

branches/Independent/Os.pas

@@ -4 +4 @@
 
 uses
-  Classes, SysUtils, Generics.Collections, DateUtils, Api, Console, FileSystem;
+  Classes, SysUtils, Generics.Collections, DateUtils, Api, Console, FileSystem,
+  Mouse;
 
 type
@@ -63 +64 @@
     Console: TConsole;
     FileSystem: TFileSystem;
+    Mouse: TMouse;
     Apps: TApps;
     RunningApps: TRunningApps;
@@ -187 +189 @@
   Windows := TWindows.Create;
   Console := TConsole.Create;
+  Mouse := TMouse.Create;
   FileSystem := TFileSystem.Create;
   RunningApps := TRunningApps.Create;
@@ -197 +200 @@
   FreeAndNil(RunningApps);
   FreeAndNil(Console);
+  FreeAndNil(Mouse);
   FreeAndNil(FileSystem);
   FreeAndNil(Windows);