diff options
| author | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-10-14 07:04:28 +0000 |
|---|---|---|
| committer | k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2010-10-14 07:04:28 +0000 |
| commit | 99c581a124e9a301e88eb1e3af9e09bce182fd3f (patch) | |
| tree | eeb3c3cb0c4771516ed7f9c17b4a5defa2af5f2b /src/screens | |
| parent | cee584d22300a49d190e842c59d542bc4b096cb7 (diff) | |
| download | usdx-99c581a124e9a301e88eb1e3af9e09bce182fd3f.tar.gz usdx-99c581a124e9a301e88eb1e3af9e09bce182fd3f.tar.xz usdx-99c581a124e9a301e88eb1e3af9e09bce182fd3f.zip | |
Mac OS X Readme
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2664 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'src/screens')
| -rw-r--r-- | src/screens/UScreenSong.pas | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/src/screens/UScreenSong.pas b/src/screens/UScreenSong.pas index 6fe8d204..abd4f760 100644 --- a/src/screens/UScreenSong.pas +++ b/src/screens/UScreenSong.pas @@ -283,15 +283,23 @@ begin SDL_ModState := SDL_GetModState and (KMOD_LSHIFT + KMOD_RSHIFT + KMOD_LCTRL + KMOD_RCTRL + KMOD_LALT + KMOD_RALT); + Log.LogError('TScreenSong.ParseInput', 'SDL_ModState: ' + IntToStr(SDL_ModState)); + Log.LogError('TScreenSong.ParseInput', 'KMOD_LALT: ' + IntToStr(KMOD_LALT)); + Log.LogError('TScreenSong.ParseInput', 'Mode: ' + IntToStr(Ord(Mode))); + Log.LogError('TScreenSong.ParseInput', 'smNormal: ' + IntToStr(Ord(smNormal))); + Log.LogError('TScreenSong.ParseInput', 'PressedKey: ' + IntToStr(Ord(PressedKey))); + Log.LogError('TScreenSong.ParseInput', 'CharCode: ' + IntToStr(Ord(CharCode))); //Jump to Artist/Titel if ((SDL_ModState and KMOD_LALT <> 0) and (Mode = smNormal)) then begin - UpperLetter := UCS4UpperCase(CharCode); + UpperLetter := UCS4UpperCase(PressedKey); + Log.LogError('TScreenSong.ParseInput', 'UpperLetter: ' + IntToStr(Ord(UpperLetter))); if (UpperLetter in ([Ord('A')..Ord('Z'), Ord('0') .. Ord('9')]) ) then begin I2 := Length(CatSongs.Song); + Log.LogError('TScreenSong.ParseInput', '**** Got a key.'); //Jump To Titel if (SDL_ModState = (KMOD_LALT or KMOD_LSHIFT)) then |