* BUG: Key.Code is not case sensitive for keys 'A' up to 'Z'.


git-svn-id: svn://localhost/gambas/trunk@3261 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2010-10-08 01:18:17 +00:00
parent 4e28d06b76
commit ba70da2041

View file

@ -64,8 +64,13 @@ int gKey::code()
{
if (!_valid)
return 0;
else
return _event.keyval;
int code = _event.keyval;
if (code >= GDK_a && code <= GDK_z)
code += GDK_A - GDK_a;
return code;
}
int gKey::state()