mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-23 01:19:37 +02:00
VK_NUMPAD0 is a editable key too (issue #1730)
git-svn-id: trunk@8765 -
This commit is contained in:
parent
5ced41c831
commit
bdfd016800
@ -541,7 +541,7 @@ end;
|
||||
function IsEditableTextKey(Key: Word): Boolean;
|
||||
begin
|
||||
Result := (((Key >= VK_A) and (Key <= VK_Z)) or
|
||||
((Key = VK_NUMPAD0) and (Key <= VK_DIVIDE)) or
|
||||
((Key >= VK_NUMPAD0) and (Key <= VK_DIVIDE)) or
|
||||
((Key >= 186) and (Key <= 188)) or
|
||||
((Key >= 190) and (Key <= 192)) or
|
||||
((Key >= 219) and (Key <= 222)));
|
||||
|
Loading…
Reference in New Issue
Block a user