equal
deleted
inserted
replaced
1993 end; |
1993 end; |
1994 |
1994 |
1995 |
1995 |
1996 procedure onFocusStateChanged; |
1996 procedure onFocusStateChanged; |
1997 begin |
1997 begin |
|
1998 {$IFDEF MOBILE} |
|
1999 if (not cHasFocus) and (not isPaused) then |
|
2000 ParseCommand('pause', true); |
|
2001 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio |
|
2002 exit; |
|
2003 {$ENDIF} |
1998 if (not cHasFocus) and (GameState <> gsConfirm) then |
2004 if (not cHasFocus) and (GameState <> gsConfirm) then |
1999 ParseCommand('quit', true); |
2005 ParseCommand('quit', true); |
2000 {$IFDEF MOBILE} |
|
2001 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio |
|
2002 exit; |
|
2003 {$ENDIF} |
|
2004 |
2006 |
2005 {$IFDEF USE_VIDEO_RECORDING} |
2007 {$IFDEF USE_VIDEO_RECORDING} |
2006 // do not change volume during prerecording as it will affect sound in video file |
2008 // do not change volume during prerecording as it will affect sound in video file |
2007 if (not flagPrerecording) then |
2009 if (not flagPrerecording) then |
2008 {$ENDIF} |
2010 {$ENDIF} |