Преглед изворни кода

* fix for 11679, hide cursor when returning from dosshell/userprog

git-svn-id: trunk@14918 -
marco пре 15 година
родитељ
комит
9fb153f725
1 измењених фајлова са 2 додато и 1 уклоњено
  1. 2 1
      ide/fpide.pas

+ 2 - 1
ide/fpide.pas

@@ -1468,6 +1468,7 @@ begin
 
   if Assigned(UserScreen) then
     UserScreen^.SwitchBackToIDEScreen;
+  Video.SetCursorType(crHidden);
 {$ifdef Windows}
   { This message was sent when the VideoBuffer was smaller
     than was the IdeApp thought => writes to random memory and random crashes... PM }
@@ -1476,7 +1477,7 @@ begin
 {$ifdef Unix}
   SetKnownKeys;
 {$endif Unix}
-{$ifndef Windows}
+ {$ifndef Windows}
 {$ifndef go32v2}
   UpdateScreen(true);
 {$endif go32v2}