X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fgame%2Fg_gui.pas;h=07a03c19081dcbf21589dd8569ec03946c26b5c2;hb=e4aa606d7d71d9836908fab23aae7e99728b11ee;hp=494839e01324c73d6281594ff0db2a9c60d54d49;hpb=d92a9e2807dda8a533def35afa801ed975920885;p=d2df-sdl.git

diff --git a/src/game/g_gui.pas b/src/game/g_gui.pas
index 494839e..07a03c1 100644
--- a/src/game/g_gui.pas
+++ b/src/game/g_gui.pas
@@ -2336,7 +2336,7 @@ begin
         end;
     end;
 
-  g_GUIGrabInput := FWindow.FActiveControl = Self;
+  g_GUIGrabInput := (@FOnEnterEvent = nil) and (FWindow.FActiveControl = Self);
   g_Touch_ShowKeyboard(g_GUIGrabInput)
 end;