hedgewars/uWorld.pas
changeset 13412 236cc4cf2448
parent 13370 e202d58236b1
parent 13224 01ab48b253ef
child 13459 08a3851aaf67
equal deleted inserted replaced
13410:7487e683c6b6 13412:236cc4cf2448
  2012 end;
  2012 end;
  2013 
  2013 
  2014 
  2014 
  2015 procedure onFocusStateChanged;
  2015 procedure onFocusStateChanged;
  2016 begin
  2016 begin
       
  2017 {$IFDEF MOBILE}
       
  2018 if (not cHasFocus) and (not isPaused) then
       
  2019     ParseCommand('pause', true);
       
  2020 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio
       
  2021 exit;
       
  2022 {$ENDIF}
  2017 if (not cHasFocus) and (GameState <> gsConfirm) then
  2023 if (not cHasFocus) and (GameState <> gsConfirm) then
  2018     ParseCommand('quit', true);
  2024     ParseCommand('quit', true);
  2019 {$IFDEF MOBILE}
       
  2020 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio
       
  2021 exit;
       
  2022 {$ENDIF}
       
  2023 
  2025 
  2024 {$IFDEF USE_VIDEO_RECORDING}
  2026 {$IFDEF USE_VIDEO_RECORDING}
  2025 // do not change volume during prerecording as it will affect sound in video file
  2027 // do not change volume during prerecording as it will affect sound in video file
  2026 if (not flagPrerecording) then
  2028 if (not flagPrerecording) then
  2027 {$ENDIF}
  2029 {$ENDIF}