hedgewars/uTouch.pas
changeset 6685 ef706fccfb0a
parent 6684 112a0eb8782b
child 6687 98be933770e0
equal deleted inserted replaced
6684:112a0eb8782b 6685:ef706fccfb0a
   149                 exit;
   149                 exit;
   150             end;
   150             end;
   151             if isOnRect(forwardjump, finger^) then
   151             if isOnRect(forwardjump, finger^) then
   152             begin
   152             begin
   153                 backspaceKey:= true;
   153                 backspaceKey:= true;
       
   154                 exit;
       
   155             end;
       
   156             if isOnRect(pauseButton, finger^) then
       
   157             begin
       
   158                 isPaused:= not isPaused;
   154                 exit;
   159                 exit;
   155             end;
   160             end;
   156             moveCursor:= not bShowAmmoMenu;
   161             moveCursor:= not bShowAmmoMenu;
   157         end;
   162         end;
   158         2:
   163         2: