hedgewars/hwengine.dpr
changeset 308 806c3b55500d
parent 302 7aca131ecd7f
child 316 57d50189ad86
--- a/hedgewars/hwengine.dpr	Thu Jan 04 18:54:24 2007 +0000
+++ b/hedgewars/hwengine.dpr	Sun Jan 07 16:53:16 2007 +0000
@@ -135,6 +135,8 @@
                                         end;
                           gsConsole: KeyPressConsole(event.key.keysym.sym);
                              end;
+           SDL_ACTIVEEVENT: if (event.active.state and SDL_APPINPUTFOCUS) <> 0 then
+                               cHasFocus:= event.active.gain = 1;
            SDL_QUITEV: isTerminated:= true
            end;
 CurrTime:= SDL_GetTicks;