[Lazarus] IsEditableTextKey bug?
AlexeyT
aaa5500 at ya.ru
Mon Feb 11 12:12:13 CET 2019
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_0) and (Key <= VK_9)) or
((Key >= 186) and (Key <= 188)) or
((Key >= 190) and (Key <= 192)) or
((Key >= 219) and (Key <= 222)));
end;
See that 188 here, 189 missed, 190 here. 189 is VK_OEM_MINUS.
VK_OEM_PLUS = $BB; // For any country/region, the '+' key
VK_OEM_COMMA = $BC; // For any country/region, the ',' key
VK_OEM_MINUS = $BD; // For any country/region, the '-' key
VK_OEM_PERIOD = $BE; // For any country/region, the '.' key
why it's missed?
--
Regards,
Alexey
More information about the lazarus
mailing list