1 files changed, 4 insertions, 0 deletions
diff --git a/gfx/gfxbase.pas b/gfx/gfxbase.pas
index 050797e3..83fd2a36 100644
--- a/gfx/gfxbase.pas
+++ b/gfx/gfxbase.pas
@@ -435,8 +435,12 @@ type
   { TFCustomScreen }
 
   TFCustomScreen = class(TObject)
+  protected
+    procedure   SetMousePos(const NewPos: TPoint); virtual; abstract;
+    function    GetMousePos: TPoint; virtual; abstract;
   public
     constructor Create; virtual;
+    property    MousePos: TPoint read GetMousePos write SetMousePos;
   end;
 
   { TFCustomApplication }