hedgewars/hwengine.pas
branchhedgeroid
changeset 5540 76392a62da2f
parent 5530 25d4118056e1
child 5550 50650032c251
equal deleted inserted replaced
5538:dcfa3bf24a2a 5540:76392a62da2f
   167                     if event.window.event = SDL_WINDOWEVENT_SHOWN then
   167                     if event.window.event = SDL_WINDOWEVENT_SHOWN then
   168                         begin
   168                         begin
   169                         cHasFocus:= true;
   169                         cHasFocus:= true;
   170                         onFocusStateChanged()
   170                         onFocusStateChanged()
   171                         end;
   171                         end;
       
   172                 SDL_FINGERDOWN: WriteToConsole('finger down');
       
   173                 SDL_FINGERMOTION: WriteToConsole('finger is moving');
       
   174                 SDL_FINGERUP: WriteToConsole('finger up');
   172 {$ELSE}
   175 {$ELSE}
   173                     KeyPressChat(event.key.keysym.unicode);
   176                     KeyPressChat(event.key.keysym.unicode);
   174                 SDL_MOUSEBUTTONDOWN: if event.button.button = SDL_BUTTON_WHEELDOWN then wheelDown:= true;
   177                 SDL_MOUSEBUTTONDOWN: if event.button.button = SDL_BUTTON_WHEELDOWN then wheelDown:= true;
   175                 SDL_MOUSEBUTTONUP: if event.button.button = SDL_BUTTON_WHEELUP then wheelUp:= true;
   178                 SDL_MOUSEBUTTONUP: if event.button.button = SDL_BUTTON_WHEELUP then wheelUp:= true;
   176                 SDL_ACTIVEEVENT:
   179                 SDL_ACTIVEEVENT: