hedgewars/hwengine.pas
changeset 5052 74a81c276d67
parent 4976 088d40d8aba2
child 5066 d2684b6f02ce
equal deleted inserted replaced
5051:7b5fa8d3c904 5052:74a81c276d67
   152                 SDL_KEYDOWN: if GameState = gsChat then
   152                 SDL_KEYDOWN: if GameState = gsChat then
   153 {$IFDEF SDL13}
   153 {$IFDEF SDL13}
   154                     // sdl on iphone supports only ashii keyboards and the unicode field is deprecated in sdl 1.3
   154                     // sdl on iphone supports only ashii keyboards and the unicode field is deprecated in sdl 1.3
   155                     KeyPressChat(event.key.keysym.sym);
   155                     KeyPressChat(event.key.keysym.sym);
   156                 SDL_WINDOWEVENT:
   156                 SDL_WINDOWEVENT:
   157                     if event.wevent.event = SDL_WINDOWEVENT_SHOWN then
   157                     if event.window.event = SDL_WINDOWEVENT_SHOWN then
   158                         cHasFocus:= true;
   158                         cHasFocus:= true;
   159 {$ELSE}
   159 {$ELSE}
   160                     KeyPressChat(event.key.keysym.unicode);
   160                     KeyPressChat(event.key.keysym.unicode);
   161                 SDL_MOUSEBUTTONDOWN: if event.button.button = SDL_BUTTON_WHEELDOWN then wheelDown:= true;
   161                 SDL_MOUSEBUTTONDOWN: if event.button.button = SDL_BUTTON_WHEELDOWN then wheelDown:= true;
   162                 SDL_MOUSEBUTTONUP: if event.button.button = SDL_BUTTON_WHEELUP then wheelUp:= true;
   162                 SDL_MOUSEBUTTONUP: if event.button.button = SDL_BUTTON_WHEELUP then wheelUp:= true;