diff options
| author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-22 11:58:28 +0000 |
|---|---|---|
| committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-22 11:58:28 +0000 |
| commit | dbeaec3a0e5a50c84b70b28ae00a368a3e6e98e9 (patch) | |
| tree | bb3633e752ea30874f704be70ec82354d70faf1e /Game/Code/Screens/UScreenOpen.pas | |
| parent | a7659bea0fcdec8d1b34955f9c56b066ff27a3cb (diff) | |
| download | usdx-dbeaec3a0e5a50c84b70b28ae00a368a3e6e98e9.tar.gz usdx-dbeaec3a0e5a50c84b70b28ae00a368a3e6e98e9.tar.xz usdx-dbeaec3a0e5a50c84b70b28ae00a368a3e6e98e9.zip | |
Support for non-US (QWERTY) keyboard layout.
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@970 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
| -rw-r--r-- | Game/Code/Screens/UScreenOpen.pas | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Game/Code/Screens/UScreenOpen.pas b/Game/Code/Screens/UScreenOpen.pas index b069f3c8..3a15f26f 100644 --- a/Game/Code/Screens/UScreenOpen.pas +++ b/Game/Code/Screens/UScreenOpen.pas @@ -31,9 +31,11 @@ uses UGraphic, UDraw, UMain, USkins; function TScreenOpen.ParseInput(PressedKey: Cardinal; CharCode: WideChar; PressedDown: Boolean): Boolean;
begin
Result := true;
+
if (PressedDown) then begin // Key Down
+ // check normal keys
case CharCode of
- 'a'..'z', 'A'..'Z', '0'..'9', #32, '-', '.', ':', '\':
+ '0'..'9', 'a'..'z', 'A'..'Z', ' ', '-', '.', ':', '\':
begin
if Interaction = 0 then begin
Text[TextN].Text := Text[TextN].Text + CharCode;
@@ -41,6 +43,7 @@ begin end;
end;
+ // check special keys
case PressedKey of
SDLK_Q:
begin
|