1914 

  1914 

  1915 procedure onFocusStateChanged;

  1915 procedure onFocusStateChanged;

  1916 begin

  1916 begin

  1917 if (not cHasFocus) and (GameState <> gsConfirm) then

  1917 if (not cHasFocus) and (GameState <> gsConfirm) then

  1918     ParseCommand('quit', true);

  1918     ParseCommand('quit', true);

  1920 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio

  1920 // when created SDL receives an exposure event that calls UndampenAudio at full power, muting audio

  1921 exit;

  1921 exit;

  1922 {$ENDIF}

  1922 {$ENDIF}

  1923 

  1923 

  1924 {$IFDEF USE_VIDEO_RECORDING}

  1924 {$IFDEF USE_VIDEO_RECORDING}