hedgewars/SDLh.pas
changeset 7191 9419294e5f33
parent 7167 0b3b306f129a
child 7193 65a022bf6bde
child 7194 d8e68cbca7ee
--- a/hedgewars/SDLh.pas	Wed Jun 06 17:56:39 2012 -0400
+++ b/hedgewars/SDLh.pas	Thu Jun 07 01:10:57 2012 +0200
@@ -270,6 +270,19 @@
     AShift = 0;
 {$ENDIF}
 
+    KMOD_NONE   = $0000;
+    KMOD_LSHIFT = $0001;
+    KMOD_RSHIFT = $0002;
+    KMOD_LCTRL  = $0040;
+    KMOD_RCTRL  = $0080;
+    KMOD_LALT   = $0100;
+    KMOD_RALT   = $0200;
+    KMOD_LMETA  = $0400;
+    KMOD_RMETA  = $0800;
+    KMOD_NUM    = $1000;
+    KMOD_CAPS   = $2000;
+    KMOD_MODE   = $4000;
+
     {* SDL_mixer *}
     MIX_MAX_VOLUME = 128;
     MIX_INIT_FLAC  = $00000001;