paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-14 12:40:20 +02:00
Code Issues Packages Projects Releases Wiki Activity

VK_NUMPAD0 is a editable key too (issue #1730)

Browse Source 
git-svn-id: trunk@8765 -
This commit is contained in:
vincents 2006-02-17 21:06:47 +00:00
parent 5ced41c831
commit bdfd016800
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/lclproc.pas
View File

@ -541,7 +541,7 @@ end;
function IsEditableTextKey(Key: Word): Boolean; function IsEditableTextKey(Key: Word): Boolean;
begin begin
Result := (((Key >= VK_A) and (Key <= VK_Z)) or 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 >= 186) and (Key <= 188)) or
((Key >= 190) and (Key <= 192)) or ((Key >= 190) and (Key <= 192)) or
((Key >= 219) and (Key <= 222))); ((Key >= 219) and (Key <= 222)));