1 files changed, 2 insertions, 1 deletions
diff --git a/src/gui/gui_edit.pas b/src/gui/gui_edit.pas
index c94e2bca..ad04f01d 100644
--- a/src/gui/gui_edit.pas
+++ b/src/gui/gui_edit.pas
@@ -546,7 +546,8 @@ begin
   inherited HandleMouseEnter;
   if (csDesigning in ComponentState) then
     Exit;
-  MouseCursor := mcIBeam;
+  if Enabled then
+    MouseCursor := mcIBeam;
 end;
 
 procedure TfpgEdit.HandleMouseExit;