diff options
Diffstat (limited to 'Game/Code/Screens/UScreenSing.pas')
-rw-r--r-- | Game/Code/Screens/UScreenSing.pas | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas index 6d05c145..bc6c0966 100644 --- a/Game/Code/Screens/UScreenSing.pas +++ b/Game/Code/Screens/UScreenSing.pas @@ -135,9 +135,9 @@ begin If (PressedDown) Then begin // Key Down // check normal keys - case WideUpperCase(CharCode)[1] of
+ case WideCharUpperCase(CharCode)[1] of 'Q': - begin
+ begin //When not ask before Exit then Finish now if (Ini.AskbeforeDel <> 1) then Finish @@ -148,7 +148,7 @@ begin Result := false; Exit; end; - 'V': //Show Visualization
+ 'V': //Show Visualization begin fShowVisualization := not fShowVisualization; @@ -162,12 +162,12 @@ begin Exit; end; - 'P':
+ 'P': begin Pause; Exit; end; - end;
+ end; // check special keys case PressedKey of |